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Inhoud van dit nummer 


Redactioneel 

Uitdaging 

In een situatie, waarin gerust 
gesproeken kan worden van 
een prijsoorlog bij de iets duur¬ 
dere PC, weet Commodore 
zich de laatste tijd weer redelijk 
staande te houden. Men heeft 
weer een klein beetje winst ge¬ 
maakt en na afslanking van de 
organisatie gaat men er nu 
weer tegenaan. De nieuwe C- 
64 in het opgefriste jasje loopt 
goed en met GEOS is er weer 
wat nieuws te beleven voor de 
hobbyisten. 

Men probeert nu de Amiga wat 
duidelijker te profileren en ook 
wel wat af te zetten tegen de 
enorme golf goedkope PC klo¬ 
nen. Betere grafische kwalitei¬ 
ten, een snellere processor en 
de nadruk op het creatieve ge¬ 
bruik, dat is de boodschap van 
Commodore. Dit nummer be¬ 
steden we dan ook wat aan¬ 
dacht aan de nieuwe software, 
die dit allemaal mogelijk 
maakt. 

We willen verder alvast wijzen 
op de traditionele Computer 
Info beurs, die we op 1 novem¬ 
ber weer in de RAI organiseren. 
Deze keer heeft u de kans, de 
rijen voor de kassa’s te omzei¬ 
len door vooraf uw kaartjes al 
te bestellen. Dat is, u weet het 
vast nog wel, hard nodig want 
de belangstelling voor deze 
beurzen is altijd overweldi¬ 
gend. WE kunnen echter geen 
grotere ruimtes huren, die zijn 
altijd zeer lang van te voren 
geboekt. Maar op deze manier 
kunnen onze trouwe lezers 
toch moeiteloos naar binnen. 
Tot ziens op een november! 
L.S. 
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Fischer-”computer”- Techniek 

Het bekende "Fischertechniek” is constructiespeelgoed, dat 
ook heel goed te gebruiken en te besturen valt met de computer. 
Zo kun je zelf robotjes en dergelijke bouwen, maar ook nuttiger 
dingen als plotters. Fischertechniek biedt bijvoorbeeld een 
compleet bouwpakket aan van een plotter, die ook te gebruiken 
is als digitizer - een omgekeerde plotter eigenlijk, waarmee je 
bestaande plaatjes in het geheugen kunt zetten door ze na te 



tekenen met een armpje, dat de bewegingen omzet in ”grap- 
hics-data”. De plotter/scanner kan op alle gangbare computers 
aangesloten worden met het juiste interface, en hij kost onge¬ 
veer 500 gulden. Ook is er een universeeldoos beschikbaar, 
waarmee minstens tien verschillende apparaten te bouwen zijn. 
Uiteraard kan de koper alles naar eigen wensen, ideeën en 
fantasieën aanpassen. Fischertechnik levert ook de benodigde 
software voor alle projecten. 


nieuui/nieuuj/nieuiu/ 
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Vorig jaar brachten wij ‘Hacker’ zonder enige gebruiksaanwijzing op de markt. Het vervolg ‘Hacker II’ is dermate moeilijk dat we 
dit niet meer aandurfden. Let erop dat u een rederlandse gebruiksaanwijzing krijgt, anders is het u onmogelijk het boek ‘The 
Doomsday Papers' uit het een uiterst beveiligd Russisch complex, ergens in Siberië, te halen. Het lot van de westerse wereld ligt 
weer eens in uw handen. Het bezit van een printer is nuttig, maar niet beslist noodzakelijk. Het maken van een goede plattegrond 


wel. 

Cassette en diskette voor Commodore 64/128 
diskette voor IBM pc, Amiga, Apple II en Atari st 
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Lions Club Amstelveen heeft een eigentijdse actie voor een eigentijds doel. Als blad 
geven we ze graag wat ruimte om een sympathieke actie bij u onder de aandacht te 
brengen. 


Computer- 

Puzzle 



Help het onderwijs aan lichamelijk gehandicapten 
aan zijn computers! 

Doe mee aan de Lions computerpuzzle. 

I n het onderwijs aan lichamelijk gehandicapten hebben de MYTYL-scholen een 
belangrijk aandeel. Het onderwijs op deze scholen heeft in het verleden al een 
sprong voorwaarts gemaakt door het gebruik van (micro)-electronica bij het 
ontwikkelen van hulpinstrumentarium, dat het de gehandicapte leerling moge¬ 
lijk maakt beter met zijn omgeving te communiceren. Een nieuwe sprong 
voorwaarts wordt teweeg gebracht door het gebruik van de computer als leermid¬ 
del. 



We bedoelen dan computer-ondersteund 
onderwijs, waardoor de prestaties van de 
leerlingen in gunstige zin worden bein- 
vloed, en waardoor meer leerlingen de 
nodige intensieve begeleiding kunnen 
krijgen. 

De doelstelling van een project van de 
Lions-club Amstelveen is, de aanschaf 
mogelijk te maken van het benodigde ma¬ 
teriaal om de kennis, die op 7 proefproject- 
scholen is opgedaan onder begeleiding 
van de werkgroep ”C.O.LG.”, verder te 
verspreiden naar de overige 28 Mytyl¬ 
scholen. 

Hoe willen de Lions dit doel bereiken? 

De Lions-club Amstelveen richt zich met 
een actie tot de huiscomputerbezitters. 
Wij denken, dat velen, die al in het gelukki¬ 
ge bezit van een computer zijn, zich als 
groep verantwoordelijk willen voelen voor 
het bereiken van het doel en mee zullen 
doen aan deze wedstrijd , die moet wor¬ 
den gespeeld met een Commodore-64. 
Commodore-lnfo verleent haar welwillen¬ 
de medewerking aan deze aktie, door de 
wedstrijd in het blad op te nemen, waar¬ 
door deze echt een feit wordt, en boven¬ 
dien een stand op de Computer Info Beurs 


van 1 november a.s. te bestemmen voor 
de aktiviteit. 

De Prijzen 

Bij een wedstrijd horen natuurlijk ook prij¬ 
zen. Voor het houden van de wedstrijd is 
justitiële toestemming verleend. De vol¬ 
gende regel is van kracht: per 1000 deel¬ 
nemers wordt onder de inzenders van 
correcte oplossingen een prijs verloot van 
ƒ 1000,-. Dat is beslist een hogere kans op 
zo’n bedrag dan in een loterij. Daarnaast 
worden een aantal kleinere en grotere prij¬ 
zen ter beschikking gesteld door Commo- 
dore-lnfo alsmede door Commodore Ne¬ 
derland, voor de meest originele inzendin¬ 
gen van de extra opdracht (zie hieronder). 

Wat houdt de wedstrijd in? 

De wedstrijd bestaat uit een puzzle voor 
-zoals gezegd- de Commodore 64. Het 
vraagstuk kun je op drie manieren aanpak¬ 
ken. Er is een geniale manier, die het 
antwoord meteen oplevert, een lastige ma¬ 
nier, die redelijk snel resultaat geeft, en een 
gemakkelijke manier, waarvoor je wel een 
hoop geduld moet opbrengen. Voor de 
geniale manier moet je een slimme pro¬ 
grammeur zijn en kun je je handboeken in 


de kast laten. Voor de "lastige” aanpak 
moet je de weg kennen in de standaard bij 
de Commodore geleverde handleiding, en 
wat ervaring hebben in het uitzoeken van 
de werking van programma’s. 

Eventuele uitbreidingsprintjes moeten wel 
uit de computer gehaald worden. Soms 
beïvloeden ze n.l. het resultaat. 

Hoe los je de puzzle op? 

Type het hieronder uitgelijste programma 
in en controleer het op tikfouten. 

10 prinf’geef uw slagzin”:input a$ 

20 os$=””:dum=rnd(-1):restore 
30 II =len(a$):if II > 25 then 11=25 
40 for ct=1 to II 
50 cin=asc(mid$(a$,ct,1)) 

60 read a 

70 b=int(rnd(1)*26+1) 

80 cm=cin+a-b 

90 if cm < 32 then cm=32 

100 os$=os$+chr$ (cm) 

110 next ct 

120 print ”u krijgt als resultaat:” 

130 print tab(2)os$ 

140 print:goto 10 

150data 16,33,27,0,-4,40,6,16,-35,28,0, 

14,18,12,-2,25,-45,15,19,-9,20,18,10,23 
160 data 24 
170 end 

De puzzle draait om een slagzin. Het is dan 
ook een vorm van tekstmanipulatie. De 
slagzin bestaat uit twee gedeelten, waar¬ 
van het tweede deel wordt gegeven, en het 
eerste deel door de deelnemers moet wor¬ 
den gevonden. 

De tweede helft van de slagzin luidt: 
"SPRINGEN IN WAAR MOGELIJK” (na¬ 
tuurlijk zonder de aanhalingstekens). Je 
typt dus tekst in, en het programma geeft 
je een andere tekst terug! Bij invoer van de 
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correcte eerste helft van de slagzin in het 
programma zal als resultaat de tekst 
"SPRINGEN IN WAAR MOGELIJK” ver¬ 
schijnen. Bij niet correcte invoer ontstaat 
er baarlijke nonsens op het beeldscherm. 

Een paar tips 

Als je de geduldmethode wilt proberen, 
dan kost dat bij benadering 
26+2*26+3*26....+25*26 toetsaansla¬ 
gen. Ter geruststelling: je hebt al veel 
eerder door wat er uit moet komen! Be¬ 
denk wel, dat er een spatie in de invoerre- 
gel kan voorkomen. Om te zorgen, dat de 
computer die spatie ook ziet, moet er wel 
een ander teken achter getikt worden. 
Leestekens en cijfers komen niet voor! 

De moeilijke methode houdt in, dat je de 
omgekeerde weg volgt van wat de ontwer¬ 
per van de puzzle heeft gedaan. 

Om die weg te kunnen bewandelen is de 
volgende informatie van nut. In regel 20 
wordt ervoor gezorgd, dat de computer 
elke nieuwe tekstregel, die als slagzin 
wordt uitgeprobeerd op dezelfde manier 
behandelt. 

De berekening in regel 70 is interessant. Je 
kunt altijd een regel in het programma 
tussenvoegen! 

Regelnummer 80 is zeer diepzinnig en 
verdient dan ook geen verder commen¬ 
taar. 

In regel 90 wordt ervoor gezorgd, dat bij elk 
ingetypt teken ook een karakter door het 
programma wordt afgedrukt. 

Gebruik zonodig aanhangsel F uit Com¬ 
modore 64 handboek. 

Samengevat: 

Zoek de invoerregel, die ervoor zorgt, dat 
het programmaatje afdrukt:”U KRIJGT 
ALS RESULTAAT: SPRINGEN IN WAAR 
MOGELIJK”. Veel succes. We rekenen op 
jullie! 

De extra opdracht. 

Deze is niet verplicht, maar levert je de 
kans op, extra prijzen te winnen met een 
goed idee. We vragen jullie, een originele 
toepassing van huiscomputers in het com¬ 
puterondersteund onderwijs aan lichame¬ 
lijk gehandicapten te bedenken en het idee 
te beschrijven. Misschien rolt er een echt 
nieuwe toepassing uit de bus. De inzendin¬ 
gen zullen op bruikbaarheid worden be¬ 
oordeeld door vertegenwoordigers uit het 
computerondersteund onderwijs aan de 
Mytyl-scholen. Voorwaarde voor het mee¬ 
dingen van je inzending is wel, dat je de 
puzzle correct hebt opgelost. 
Commodore-lnfo looft ook nog een aantal 
boeken en software-pakketten uit. Com- 
modore-Nederland biedt voor de beste 
inzending van de extra opdracht de keuze 
uit een C64, een 1541 drive, een MPS- 
1000 printer of een 1901 monitor. 


Hoe mee te doen? 

Deelname kost je ƒ 5.00 plus een postzegel. De 
oplossing van de puzzle kan alleen worden ingezonden 
door gebruik te maken van het hieronder afgedrukte 
antwoordformulier. Dit formulier moet- tesamen met 
een (giro- of bank) betaalkaart of Eurocheque ten 
bedrage van ƒ 5.00 en eventueel een briefje met het idee 
voor de extra opdracht in een gesloten enveloppe 
worden opgestuurd naar : 

Stichting; Activiteitenfonds Lions Club Amstelveen 

Postbus 772 

1180 AB Amstelveen. 

Vergeet niet het nummer van je betaalpasje op de 
cheque te vermelden. Niet inbare of van een te laag 
bedrag voorziene inzendingen dingen niet mee naar 
prijzen. 

Inzendingen moeten binnen zijn voor 1 december. 
Daarna wordt onder notarieel toezicht de trekking voor 
de geldprijzen verricht. Extra prijzen worden uitgereikt 
op voordracht van de werkgroep C.O.L.G. Winnaars 
worden in Commodore-lnfo bekend gemaakt. Aan de 
prijsuitreiking zal i.s.m. de sponsors en de C.O.L.G- 
groep, waarvoor de opbrengst bestemd is, de nodige 
ruchtbaarheid worden gegeven. 



ANTWOORDFORMULIER. 


Uitknippen en volgens bovenstaande instructies opsturen naar PB 772, 
1180 AB Amstelveen. 

De slagzin luidt als volgt: 

L.“A.S..ty.dA... tv. WA M ïtSÓtèi springen in waar mogelijk 

Naam deelnemer:. . HL e d & **£ CL.. _ 

Adres :_ ÖUUe IcLCj, n e)o _ 

Postkode :_ V ^& - 

Woonplaats :_ ë €?■ r U± Z j k, -- 

Telefoon (thuis):_ ÖZSiQ — yi Z. y /_ 

Verantwoordelijke Organisatie Lions 
Clubs International, afd. Amstelveen. 

Over de uitslag wordt niet gecorrespondeerd. 
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De diskdrive voor de Commodore 64 (de 1541) 
heeft soms problemen met de afstelling van de 
kop. Met name bij het oudere model (met de 
draaiknop) schijnt dat vrij vaak voor te komen. 
Het echte afstelwerk dient door een goede tech- 
nikus gedaan te worden, maar in sommige 
gevallen biedt het onderstaande programma de 
oplossing, en een aanzienlijke kostenbesparing. 


Kopafstelling‘ 


D e 1541 en afgeleide drives zijn 
tamelijk gevoelig, dat is bekend. 
Ze werken prima, maar na een 
tijdje is soms bijstelling noodza* 
kelijk, vooral bij de wat oudere 
modellen. Dat kan soms zelf verholpen 
worden, dit artikel van Sjaak Loehlefink 
uit Apeldoorn kan daarbij helpen. 

Ook wanneer uw 1541 goed werkt, dan is 
dit programma een goede gymnastiekoe¬ 
fening, die de 'spieren’ weer wat losmaakt. 
Maar pas op met zelf rommelen in de drive. 

Ontregelde drive 

Ik kan wat betreft het probleem van de 
ontregelde drive meepraten: het is me 
twee keer overkomen. De eerste keer 
bracht ik hem naar de winkel, en kreeg 
hem een week later weer in handen. Thuis¬ 
gekomen en ƒ 99,- armer merkte ik dat het 
apparaat nog net zo funktioneerde als op 
het moment dat ik hem had weggebracht. 
Na verloop van tijd begonnen de diskettes 
die ik met de foute afstelling gebruikt had 
regelmatig read errors te geven. Bij het 
proberen met een oude diskette bleek de 
kop weer goed gepositioneerd te zijn. 

Op dat moment was er het probleem, dat ik 
de gegevens van de onzuiver geformat¬ 
teerde diskettes weer om moest zetten 
naar de goede, met alle problemen van 
dien, maar de drive werkte weer naar be¬ 
horen. 

Om nu bepaalde problemen met ontregel¬ 
de drives op te lossen, is het volgende 
programma, dat de kop gedurende een 
korte tijd flink heen en weer slingert, Het is 
daarbij wel belangrijk dat het programma 
ervoor zorgt dat er niet kontinu gepoogd 
wordt een en dezelfde fout in te lezen. Dat 
zou het tegengestelde resultaat tot gevolg 
hebben. Bovendien is het belangrijk dat de 


drive niet te lang achter elkaar door blijft 
draaien. 

Hoe werkt het programma? 

Het is in vier blokken verdeeld. Telkens 
wordt aangegeven welk blok in werking is. 
Test I werkt alsvolgt: De kop beweegt 
vanuit de uitgangspositie (meestal track 
#18, de directory) eerst naar track 
1. Van daaruit naar nummer twee, dan naar 
nummer drie, en zo door tot track #35. 
Daar aangekomen treedt het volgende 
programmablok in werking. Deze funktio- 
neert in principe hetzelfde, met dat verschil 
dat er van track 35 terug wordt gewerkt 
naar het eerste disk-spoor. 

De volgende twee blokken werken wat 
anders, en zijn dan ook een zwaar onder¬ 
deel, vooral als de diskdrive niet naar be¬ 
horen werkt. Ten eerste gaat de kop weer 
naar track #1. Van daaruit maakt hij een 
steeds groter wordende sprong, maar tel¬ 
kens terugkomend op het eerste spoor. Dit 
programmadeel is evenals het volgende, 
dat track #35 als uitgangspositie heeft, 
een goede indikatie voor wat er fout is. 

Welke fouten, welk 
probleem? 

Als de fouten meer of minder regelmatig 
op alle sporen optreden, is het waarschijn¬ 
lijk dat de kop vuil is. In dat geval is het een 
kwestie van de drive openschroeven en 
voorzichtig met een wattenstaafje en wat 
ketonspiritus (bij de drogist verkrijgbaar) 
schoonpoetsen. Ik doe dat eens per jaar 
en ik zie geen vuil van de kop komen, 
ondanks het vele gebruik van de drive. 

Bij een 'normale' afwijking zal het gebeu¬ 
ren dat de fouten op gaan treden in de lage 
nummers (1 ..5), of juist de hoge (30..35). Is 
de kop of de ophanging ervan losgeraakt, 
ontstaat er een heel ander beeld: de fouten 


zullen vaker optreden naarmate de kop 
verder heen en weer beweegt. Een bezoek 
aan de reparatiewerkplaats is dan de enige 
oplossing. 

Voorkomen is beter... 

Let er op dat de bekendste bron van 
ellende een slechte diskette is. Laat u niet 
verleiden door mooie aanbiedingen (soms 
100 stuks voor ƒ 25,-), of door het zo 
handige en voordelige dubbelzijdige ge¬ 
bruik. Om de drive te testen is een kwalita¬ 
tief goede, maar vooral goed geformat¬ 
teerde diskette een vereiste. De slechtste 
diskette die ik zelf had was de demonstra¬ 
tie diskette die meegeleverd werd met de 
drive. 

Andere oorzaken kunnen schokken, trillen 
stoten en dergelijke zijn. Doe daarom altijd 
het meegeleverde transportkartonnetje in 
de drive bij vervoer, of, in noodgevallen, 
een (oude) diskette. Op die manier kan het 
mechaniek niet bewegen. Nou ja, het kan 
wel.... 

Bescherm de drive overigens ook goed 
tegen snelle temperatuurswisselingen. 
Vervoer hem daarom door de kou in de 
originele piepschuim verpakking. Dat is 
een uitstekende isolatie. 

Voorzichtig 

Het is niet aan te raden de drive gedurende 
de herstelperiode te gebruiken om op be¬ 
langrijke diskettes te schrijven. De kans is 
groot dat er naast de sporen wordt ge¬ 
schreven, waardoor gegevens (of de hele 
diskette!) onbruikbaar worden. Dat naast 
de sporen schrijven moet u niet te licht 
opvatten, want ik kreeg zelf de melding 71 
Directory Error 16 00 (I). 

Ik wens u niet toe dat u het programma 
voor dat doel nodig zult hebben, maar 
houdt een kassettekopie achter de hand. 
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Programmalisting 
Disk test & adjust 

10 poke 53280, 0:poke 53281 ,0;print ”<clr/lt blu>”:poke 808,234 
15 t3=99:t4=0 

20 open I5,8,15,"i0":open 2,8,2," 

30 gosuD 35935 rem * test 1 

40 print ”<home>Disk test 1” 

50 print ”<down>reading track to track, 1 to 35 ” 

60 for loop = 1 to 35:gosub 430 
70 print 

15,’’ui:,”;2;0;loop;0 
80 t=int ((ti/6)*10);input 
15,a,a,$ 

90 if a<>0 then err=err+1 
100 nextgosub 359 
105 rem * test 2 

110 print ”<home> Disk test 2" 

120 print ’’<homexdown>reading track to track, 35 to 1 ” 
130 for loop=35 to 1 step -1:gosub 430 
140 print 

15,”ui:";2;0;loop;0 
150 t=int((ti/6)*10):input 
15,a,a$ 

160 if a <>0 then err=err+1 
170 nextgosub 359 
175 rem *tekst 3 

180 print ’’<home>disk test 3" 

190 print ’’<down>reading track 1 to track 

200 for loop=1 to 35:gosub 430 

210 print 

15,”ui:”;2;0;1;0 

220 print 

15,”ui:”;2;0;loop;0 

230 t=int((ti/6)*10):input 

15 , 3 , 3 $ 

240 if a<>0 then err=err+1 
250 nextgosub 359 
255 rem 'test 3 

260 print ”<home>disk test 4” 

270 print ”<down>reading track 35 to track 

280 for loop=1 to 35:gosub 430 

290 print 

15,”ui:”;2;0;35;0 

300 print 


15,’’ui;’’;2;0;loop;0 
310 t=int((ti/6)*10):input 
15,a,a$ 

320 if a oOthen err=err+1 
330 next 

340 close2:print 
15,”i0:”:close15 

341 print ”<clr>test results<down>” 

342 if t3>12 and t3<20 then print "track access time poor 
<down>” 

343 if t3>19 then print "<down>track access time bad, service 
required” 

344 if et=0 then print ”read to disk adjust ok <down>” 

345 if et>0 and et<20 then print ”head to disk adjustment poor, 
maybe bad disk” 

346 if et<20 then goto 352 

347 print ”head to disk adjustment bad. re-run test <down>with 
another disk.<down>” 

350 print ”if the results are about the same then <down>service 
is 

required” 

351 print ”if the results are better, reformat the <down> disk" 

352 print ”<2 down> tastest access time:”;tab(20);t3 

353 print ”<down> slowest access time;’’;tab(20);t4 

354 print ”<down> total read errors:”;tab(20);et 

355 end 

359 rem ‘clear 

360 et=err+et”err=0:t1 =0:t0=999:a$=”-” 

420 return 

430 rem * print screen 

440 print ”<home><5 down>read time” 

”:print ”<up>”,,t 

460 print "disk status ”:print ”<up>”,,””;a$ 

480 print "errors ”:print ”<up>”,,err 

500 print "track ”:print ”<up>”,,loop 

520 if t>ti then ti=t 

540 if t<>0 and t<t0 then t0=t 

550 print ”<up>max time ”:print ”<up>”,,t1 

570 print "min time ”:print ’’<up>”„ to 

590 ti$=”000000” 

591 if to<t3 then t3=to 

592 if ti>t4 then t4=t1 
600 return 

N.B. de afkortingen tussen <en> zijn besturingstekens. 

S.Loehlefink 



Werner is 5 spellen in een, twee behendigheidsspellen (waarvan een in de auto, de ander op de motoren bijna niet bij te houden), 
een soort van denkspel, een motor konstruktie set en 'Meiern'. Werner is maf en zo ook dit computerspel. Denk je alles gezien te 
hebben krijg je Werner. Heb je het gezien dan ben je verkocht en heb je het nog niet eens 
gespeeld! Cassette en diskette voor Commodore 64/128 
Later dit jaar diskette voor de Atari st 


arioli 
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Gebruikersprofiel 

G eregeld onderzoeken we middels enquêtes op allerlei 
beurzen en onder onze lezers wat men voor compu¬ 
ters heeft, wat men er wel en niet mee doet en wat 
men wil lezen. De redactie van Commodore-INFO wil 
namelijk graag weten wat er onder de computerge¬ 
bruikers leeft. 

Type computer 

De Commodore 64 blijft natuurlijk nog steeds de belangrijkste 
groep, met 80% van alle verkochte (en actief gebruikte, dat is nu 
eenmaal de groep die men met zo'n enquête bereikt) Commodo¬ 
res is dat een vrij onaantastbare positie. De Vic-20 is met 3% 
langzamerhand ook zijn positie kwijtgeraakt aan de C-128, die 
met 7% aardig in opkomst is. De C-16 en Plus/4 samen zijn ook 
van belang, want toch nog 5% van de gebruikers heeft er een. De 
PC achtigen PCI 0/20 hebben 3% van het aantal, maar dat 
vertaalt zich dan toch nog wel in ongeveer 6000 verkochte 
machines in ons land, als we uitgaan van plm. 200.000 actieve 
CBM gebruikers. De Amiga hebben we nog niet kunnen meten, 
maar in de eerste maand zijn er ongeveer 500 over de toonbank 
gegaan. 

Randapparatuur 

Hierbij kunnen we eigenlijk alleen bij de 64 duidelijke resultaten 
geven, maar daarbij hebben we wel een onderscheid tussen alle 
gebruikers en de groep serieuze gebruikers (met b.v. tekstbewer¬ 
king) gemaakt. Dan blijkt de helft van alle 64 gebruikers een printer 
te hebben, maar bij de serieuze groep is dat al 62%. De matrix¬ 
printer is veruit het populairst, 90% heeft er een, terwijl de 
daisywheel zo’n 7% haalt en de plotter 3%. Bij de serieuze 
gebruikers zijn er wat meer letterwielprinters. Qua monitoren is 
verrassend genoeg de verhouding kleur tegenover monochroom 
omgeslagen in het voordeel van de kleurenbuis (55/45), terwijl 
57% van de mensen het nog met de TV als beeldscherm doet. De 
diskdrives zijn sterk in opkomst, 55% van de 64 gebruikers heeft 
er een, terwijl dat bij serieus gebruik al op 70% ligt. 10% geeft aan 
een modem te bezitten, bij serieuze gebruikers is dat al 17%. 
Het blijkt dat de C-64 gebruiker toch op verschillende punten 
anders is dan de gemiddelde computergebruiker van andere 
merken. De C-64 gebruiker en vooral de gebruiker die zijn C-64 
voor serieuze toepassingen aanwendt, heeft meer randappara¬ 
tuur tot zijn beschikking. Verder blijkt dat de C-64 toch nog een 


VTZMVBITE 

PERSONAL WORD PROCESSOR 



EDITING 

- copy, move, delete, find etc. 

- tot 240 karakters per lijn 

- documenten tot 56K (20 DIN A4) 

- merge van teksten v. andere WP 

- glossary ruimte, snelle insert 

- ingeöouwde calculator 




ttintikhiauM, jraiiS'ï apin 

r tiiMi ««TT iSmum)!"**” ' sa ie v ua w 



FORMATTING 

- "what you see is what you get" 

- formaat lijn gebruikt voor TAB 
MARGES, IDENTATION en kolommen 

- symbolen herinneren TABS etc. 

- tijdelijke kantlijn rechts en links 
automatisch aligneren 

- "TRUE NEWSPAPER” kolom¬ 
men, met instelbare breedte 


PRINTING 

- multiline headers & tooters 

- automatische pagina nummering 

- mail merge 

- CENTRON. & RS232 & CBM interf. 

- proportional printing 

- printer profiles aanpasbaar 


TM 




_L 



INTEGRATED SPELLING CHECKER 


Verkrijgbaar bij de dealers van: 


EASV COmpUtiïlG 

PO Box 9 ■ Woluwe 4 • B-1150 BRUSSEL • Tel. 02/660.63.90 


BON: 


Ik wil meer informatie over 


VIZASTAR □ 
VIZAWRITE □ 


Naam:, 


Adres:. 


Postcode:, 


_ Plaats: _ 


(Dealer aanvragen welkom) 


echte hobby-computer is: toepassingen als Spelletjes en Pro¬ 

grammeren thuis scoren voor de C-64 een stuk hoger dan voor de 
computers in het algemeen. Ook schijnt de serieuze gebruiker het 

toch erg leuk te vinden spelletjes te spelen op de computer. 



geheugen. 
met software 

• Expansionboard. 2 slots 

• Expansionboard. 5 slots 


Ule produkten zijn door Zero zei: 
ontwikkeid en geproduceerd! 


bon 


Nikkelstraat 39 
2984 AM Ridderkerk 


Commodore gebruikers, 
n serieus! 


Parallel printer interface 

B pa alle printers op uw commodore 
• direct aan te sluiten • neemt geen 
eheugen in beslag • hoeft met geiaden te worden 

• aans'citbaar op seriepoort of diSKUrive Cf) 

• Optie: ingebouwde 16 k-buffers 39.50 | | 


80 teken/grafiek kaart C64 

• geeft 80. haarscherpe, tekens/rege 
sneile tekstverwerker meegeleverd 
geheugen • 40 kolomsheeld kan 
iet 80 koloms worden gemengd 


Universele Eprom programmer 

• Programmer voor 2716 t/m 
27128 

• Epromkaart. instelbaar 

• Epromwisser. voor 4 eproms 

• Expansion, 2 slots schakelaar 69 — 

• Expansion. 5 slots schakelaar 149 — 


• nederlanöse. 
geett 1 k extra 


. u — unt«io s : « 

33^1530- 


gZeRQ 

^ ELECTRONICS 


Ook zaterdags geopend 
Alle prijzen excl. BTW 


01804-30233 

Showroom: di.-za. 9.00-17.00 uur 
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LUC SALAS 
DATAKOLOM 


Abonnement 
op dit blad? 

Bel gratis 

06-0224222 

HP Teleservice: 
elke dag tot 20.30 uur 
(ook in het weekend) 


Multi-screen of venster-waanzin 

De Venster-mode slaat onverbiddelijk toe, dat wordt duide¬ 
lijk. Zelfs voor de Commodore 64, waar na lang wachten nu 
een hopelijk wel correcte versie van GEOS wordt geleverd. 
Heel leuk, alleen jammer dat er bij al dat moois op beeld maar 
zo-weinig geheugenruimte beschikbaar blijft voor de echte 
programma's. Hoe zijn we eigenlijk op het idee gekomen, dat 
meerdere beeldschermen gecombineerd op één beeld¬ 
scherm in de vorm van vensters beter zouden zijn. 

Al weer een tiental jaren geleden hebben ze op het 
researchlaboratorium PARC van Xerox dit soort dingen 
allemaal uitgeprobeerd. En zoals dat vaak gebeurt, na een 
heel lange tijd sijpelt het dan door naar de gewone gebrui¬ 
kers. Maar daarbij worden een paar dingen uit het oog 
verloren. Tien jaar geleden waren computers en monitoren 
dure dingen en men probeerde zoveel mogelijk met één zo'n 
ding te doen. Dus meer funkties in een computer en dan ook 
maar meer (deel)-schermen op een beeldscherm gepropt. 
Maar ondertussen zijn de computers èn de monitoren aan¬ 
zienlijk goedkoper geworden, en doet dat krampachtig op 
één schermpje proppen van al die informatie eigenlijk wat 
lachwekkend aan. Want wie wil nu op zijn 64 KB Commodore 
tegelijkertijd een database en een tekstprogramma laten 
draaien, of nog mooier twee spelletjes tegelijk doen. Wie 
dergelijke eisen heeft, koopt toch al snel een grotere com¬ 
puter. 

Het is me daarbij niet duidelijk, waarom de huidige generatie 
micro’s zo aan dat ene beeldscherm blijft hangen. Technisch 
is het niet zo moeilijk, om een extra tweede beeldscherm te 
gebruiken. Bij grotere CAD/CAM systemen is dat heel 
gebruikelijk, maar ook de gewone micro-gebruiker zou er 
heel wat aan hebben. Zo zou men op het ene beeld bijvoor¬ 
beeld de in te voeren tekst kunnen bekijken, en op een 
andere monitor tegelijk het eindresultaat in geformatteerde 
vorm. Het kost wat extra video-geheugen, maar is zeker niet 
ondenkbaar. Bij de PC’s zijn er zelfs nog veel meer mogelijk¬ 
heden, op deze manier zou men van de "virtuele” venstertjes 
op het scherm weer gewone beeldschermen kunnen maken. 

. L. Sala 


RBBBIT 5B5TEI715 

COMPUTERS en SUPPLIES 



Overmaat 34 
6831 AH Arnhem 

TEL. 085-23 22 21 


Wij hebben nog steeds voor u; 


ƒ 4500,00 


Amiga + Monitor + Ram exp. voor 
Software Amiga leverbaar vanaf 
Losse ram exp256K 
Printer kabel Amiga 
Diskettes 3,5 inch. dsdd 
Losse 3.5 inch drive voor Amiga 
I.B.M. 5.25 inch drive + Transformer 
voor Amiga ƒ 950,00 


ƒ 

ƒ 

ƒ 

ƒ 


98,00 

395,00 

65,00 

90,00 

850,00 


Nieuw 



Blue Chip Drive 
ter vervanging van 
de 1541-drive voor 


Commodore interface hiervoor ƒ 250,00 

Commodore C64 + Blue Chip drive ƒ 1050,00 

met speeddos ingebouwd ƒ1150,00 

Commodore C-128D + 10 disks ƒ 1650,00 

Speeddos om zelf in te bouwen ƒ 175,00 

MUIS VOOR C-128/64 ƒ 175,00 

Nog enkele video chips 6569 ƒ 75,00 

Opbergdozen met slot 5,25 inch ƒ 39,95 

Stofkappen C-64 en Cl 28 (plexiglas) 

ƒ 15,00 

Star Radix 10 printer ƒ 1850,00 

Star SG 10 printer ƒ 995,00 

Citizen 120 d matrixprinter ƒ 850,00 

Opbergdozen 3.5 ƒ 59,00 
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Multi-User Cash Terminal 

Iedereen kent wel de Multi-User Cash Ter¬ 
minal systemen in warenhuizen en groot¬ 
winkelbedrijven. Dergelijke systemen 
houden zowel de voorraad als de verkoop 
bij. Op de PC-User show in Londen zagen 
we van Commodore (op basis van de PC- 
10) een Cash Terminal-systeem. 
Commodore’s Multi-User Cash Termi¬ 
nal is een kombinatie van de PC-20 en 
MPS 1000 printer. Voor 4.000 Engelse 
ponden kan de detailhandel snel de ver- 
kooppatronen herkennen, de voorraad 
controleren, winstpercentages bereke¬ 
nen, de “going“ van concurrende goede¬ 
ren analyseren, BTW berekenen en de 
voorraad met de verkoop in balans bren¬ 
gen. Op het centrale systeem kunnen di¬ 
verse terminals worden aangesloten. Ver¬ 
koop voorlopig alleen nog in Engeland. 
Nadere info: Commodore UK. 



Viza C-128 

De software klassiekers van VIZA, de 
tekstverwerker VizaWriter en de 
Spreadsheet VizaStar, zijn nu ook in 
een geheel vernieuwde C-128-versie 
verkrijgbaar. Een ware aanvulling voor 
het serieuze softwarerepertoire van de 
Commodore C-128. 

De word processor VizaWrite staat be¬ 
kend als een gebruiksvriendelijke en veel¬ 
zijdige tekstverwerker. Haar speciale C- 
128 collega, VizaWrite Classic 128, 
maakt optimaal gebruik van de kleuren-, 
graphics- en geheugenmogelijkheden van 
de C-128. Preview is niet meer nodig daar 
VizaWrite het document direkt in zijn uit¬ 
eindelijke vorm op het monitorscherm laat 
zien. 

VizaWrite Classic 128 biedt de volgende 
mogelijkheden: 


• Editing. Highlighted (per bladzijde, pa¬ 
ragraaf, zin, woord of letter) copiëren, ver¬ 
plaatsen en wissen van tekst. Full screen 
en document scrolling tot maximaal 240 
tekens breed. Zoek en vervang-optie. 
Merging met de eigen-, Easy Script-, Su¬ 
perscript-, Paper Clip- en Omniwriter-fi- 
les. Momentaan naar een opgegeven pa¬ 
gina springen. Een venster voor snelle in- 
serts of het invullen van veel gebruikte 
termen/zinsdelen. En een ingebouwde 
calculator. 

• Formatteren. “What You See is What 
You GET“- paginadisplay. Gebruiksvrien¬ 
delijke symbolen. Tal van kantlijnen, tabu- 
latorstops en de mogelijkheid tot het ma¬ 
ken van krantenkolommen. Automatische 
paragraafafsluiting, numerieke tabulering 
en bijstellen van de rechter kantlijn. 80-ko- 
loms schermdisplay en VizaWrite Classic 
loopt in de C-128 FAST MODE. 

• Afdrukken. Automatisch printen van 
paginanummers, bovenschriften en voet¬ 
noten. Mail-Merge, ook in kombinatie met 
VizaStar databasefiles. Ingebouwde fonts 
voor CBM en Epson compatibele matrix¬ 
printers. En ondersteuning van vrijwel alle 
gangbare seriële RS23 en parallelle poort- 
printers. 

• Spellingschecker. Geintegreerd met 
30.000 woorden. 

De prijs van Viza Write zal in de winkel 
minder dan ƒ 400,- gaan bedragen. 

De VizaStar 128 spreadsheet is een geïn¬ 
tegreerde kombinatie van een electroni- 
sche rekenmatrix en een conventionele 
database. De spreadsheet biedt HIRES 
graphics, meervoudige vensters om tege¬ 
lijkertijd meerdere delen van het werkblad 
te bekijken, 64 kolommen bij 1000 rijen 
met een optimale geheugenefflciëntie zo¬ 
dat ook alle cellen binnen 128 K gebruikt 
kunnen worden, een instelbare kolom¬ 
breedte van 3-75 tekens, menubesturing, 
insert/delete van rijen of kolommen, cel- 
formules (logisch:FALSE, TRUE, ISNA, 
ISERR, IF, AND OR NOT; wiskundig: ABS, 
ATN, COS, EXP, INT, LOG, ROUND, SIN, 
SQRT en TAN; statistisch: AVG, COUNT, 



THE VIZASTAR SPREADSHEET 


MAX, MIN, SUM) een Calender en de ta- 
bel-functies HLOOPUP en VLOOKUP. 

De database maakt kaartenbakken van 
eik 15 “geindexeerde" bestanden. In een 
file gaan records van maximaal 8.000 te¬ 
kens lang. Een record mag maximaal 64 
velden van elk 128 tekens bevatten. Het 
aantal records is, binnen de mogelijkhe¬ 
den van de C-128, onbeperkt. De file- 
grootte hangt weer af van de beschikbare 
diskcapaciteit. 

Alle VizaStarfile en graphics zijn volledig 
compatibel met VizaWrite Classic 128. De 
Nederlandse prijs van VizaStar was op het 
moment van schrijven nog niet bekend. 
Nadere info bij uw computershop of VIZA 
Software Ltd., Chatham House, 14 New 
Road, Chatham, Kent ME4 4QR, UK. 

Total Office C-128 

Het geïntegreerde informatie manage- 
ments pakket Total Office van het gelijk¬ 
namige Britse softwarehuis is nu ook in 
de Commodore C-128-versie versche¬ 
nen. Total Office C-128 biedt de gebruiker 
een: 

£> Word processor. Deze tekstverwerker 
kent alle gebruikelijke tekstedit-, format- 
terings- en rapportcommando’s en is vol¬ 
ledig (merge-) geintegreerd met de data¬ 
base en spreadsheet. 

C> Spreadsheet. Deze electronische re¬ 
kenmatrix omvat 68 kolommen bij 99 rijen 
en is daarmee, in vergelijking met losse 
spreadsheets, tamelijk beperkt van om¬ 
vang. Niettemin beschikt de Total Office 
spreadsheet over optellen, aftrekken, de¬ 
len, vermenigvuldigen, minimum, maxi¬ 
mum, diverse mathematische, trigonome¬ 
trische en wetenschappelijke functies 
waarmee u formules in de werkbladcellen 
kunt stoppen. 

t> Database. Een eenvoudige kaartenbak 
met sorteren op kategorie, naam index 
key of datum. Maximaal kan gelijktijdig op 
drie verschillende kategorieën gesorteerd 
worden. Verder is het mogelijk om subfiles 
te maken en data van het ene bestand 
naar het andere te schrijven. 

[> HIRES graphics. Waaronder taart¬ 
punt-, lijnen- en staafgrafieken met posi¬ 
tieve en negatieve waarden en maximaal 
drie verschillende variabelen in een chart. 
Ook is het mogelijk om verklarende tek¬ 
sten aan de grafieken toe te voegen. 
Total Office C-128 kost ongeveer ƒ 300,-. 
Nadere info: Uw computershop of Total 
Office Software LTD., Debden Green, Saf- 
fron Walden, ESSEX CB11 3LX, UK. 
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Music Expansion 
System 

Dat aan de de C-64/C-128 synthesizer 
menige muziek- (en vrolijke) noot te 
ontlokken valt is gevoeglijk bekend. Het 
Commodore Music Expansion Systeem 
breidt de muzikale talenten van uw C-64 
of C-128 nog eens extra uit. Dit comple¬ 
te pakket maakt de Commodore machi¬ 
ne tot een volledige synthesizer en 
MIDI-opnamestudio. 

Het Music Expansion System bestaat uit, 
een cartridge, twee programma’s op cas¬ 
sette of disk en een muziekkeyboard. De 
Sound Expander soft- en hardware maakt 
de C-64 of C-128 tot een stand-alone 



synthesizer. Na het inpluggen van de 
Sound Expander in de cartridgepoort is uw 
Commodore een hi-tech FM synthesizer 
geworden. 


Naast de synthesizer hardware beschikt 
het Sound Expander module verder over 
een MIDI-interface en een 16-pins connec- 
tor voor de aansluiting van een optioneel 
keyboard. Het module wordt ondersteund 
door de beide softwarepakketten: 



C>De Sound Expander-software verzorgt 
het synthesizer gedeelte. Dit programma 
is geheel menugestuurd en biedt o.a. de 
keuze uit 12 verschillende instrumenten, 
One-Fingered Chord (het spelen van drie 
noten met een toets), diverse ritmes auto¬ 
matische begeleiding in combinatie met 
One-Fingered Chord, een instelbare pitch, 
intro’s en outro’s, 12 voorgeprogrammeer¬ 
de riffs (zichzelf herhalende muziekfrasen) 
en een notenbalkdisplay. 

Voor het spelen der noten heeft de muzi¬ 
kant de keuze uit drie verschillende toet¬ 
senborden: het meegeleverde 49 toetsen 
tellende keyboard van Commodore, het 


eigen alfanumerieke toetsenbord van de 
C-64 of C-128 en een keyboard overlay 
voor deze computers. 

0 De Sound Studio biedt een aardige mul- 
titrack studio voor de amateurmusicus. 
Zoals een goede geluidsstudio betaamt 
kan de musicus de gespeelde passages in 
real time opnemen en playbacken. De 
muziekfragmenten worden per kanaal in¬ 
gevoerd (maximaal 3 kanalen) en kunnen 
vervolgens gelijktijdig afgespeeld worden. 
Via het MIDI-interface staan 6 keyboardka- 
nalen, dus een aardig studio-orkestje, ter 
beschikking. 

Naast real time recording kent de Sound 
Studio ook nog step time recording. Bij 
step time recording worden de verschillen¬ 
de sporen noot voor noot opgenomen. 



Ook de Sound Studio Software is weer 
geheel menugestuurd. 

De complete set gaat in de winkel onge¬ 
veer ƒ 450,- kosten. 



Een meer dan bijzonder behendigheidspel waarbij de speler robots (‘droids’) bestuurt om bommen uit een gebouw met diverse 
kamers te gooien. In het begin valt het nogal mee, de gebouwen zijn niet te groot, de bommen staan niet zo op scherp ... maar pas 
op: het zweet gutst binnen de kortste keren langs de joystick! 

Met nederlandse gebruiksaanwijzing 
Cassette en diskette voor Commodore 64/128 


arioli 
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Er zijn maar weinig bedrijven die goede administratieve software voor de C-128 
ontwikkelen. En omdat daarbij onze boekhoudkundige conventies en belastingsyste¬ 
men vragen om hier gemaakte pakketten, zijn we toch op Nederlands fabrikaat 
aangewezen. Computer Consultancy Software heeft een C-128 boekhoud- en een 
factureringspakket van vaderlandse bodem. 


r 


Administratieve 
Software 

1 —' 1 —’ 1 —* Software (c) 
Verwerkingsdatum: 0 0 

Volwassen zakelijke pakketten. 



CCS 
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Z akelijke software voor de C-128 
zit momenteel aardig in de lift. 
Menig softwarehuis durft de gok 
van Commodore’s succesvolle 
homecomputertelg aan en ont¬ 
wikkelt kwalitatief goede software voor 
deze veelzijdige machine. Ook de po¬ 
tentiële CP/M-compatibiliteit mag zich 
in een toenemende belangstelling ver¬ 
heugen. 

Het Amstelveense bedrijf Computer 
Consultancy Software is een van de 
Nederlandse wegbereiders voor de se¬ 
rieuze integratie van C-128 voor de par¬ 
ticulier en het kleinbedrijf. Daarbij kan 
zij putten uit haar professionele MS- 
DOS- en CP/M-programmatuur. 

CCS B.V. is een nog betrekkelijk jong 
softwarehuis dat zich aanvankelijk alleen 
met zakelijke software voor Personal 
Computers bezig hield. Een jaar geleden 
kwam daar met de komst van een nieuwe 
medewerker verandering in. Softwareont- 
wikkelaar Oliemans ontwierp een eenvou¬ 
dig software systeem om PC-program- 
ma’s voor huiscomputers om te zetten. 
Een goed geslaagde poging gezien het 
succes op de Commodore- en MSX- 
markt. 

Het oorspronkelijk onder CP/M en MS- 
DOS draaiende PC-pakket ONYX werd 
met behulp van in eigen beheer ontwikkel¬ 
de transfer software in C-128 CP/M-for- 
maat overgezet. Sinds enkele maanden 
draait Onyx nu tot volle tevredenheid van 
de gebruikers op de C-128. Die tevreden¬ 
heid betreft niet alleen het pakket zelf maar 
ook de verleende service. Een goede sti¬ 
mulans om verder te gaan en inmiddels 
heeft CCS ook het voorraad/facturerings- 


pakket OnyxD gebruiksklaar. Op korte ter¬ 
mijn verwacht CCS nog meer pakketten in 
de professionele sfeer voor de C-128 te 
kunnen ontwikkelen. 

Service en garantie 

Na de aankoop van een zakelijk pakket 
laat CCS de gebruiker niet in de kou staan. 
Alle documentatie is Nederlandstalig en 
verlucht met tal van duidelijke voorbeelden 
en figuren. Mocht u er toch niet uitkomen 
dan staat de servicetelefoon ter beschik¬ 
king. 

Bij elk verkocht (dus niet klandestien geko¬ 
pieerd) programma bevindt zich een licen¬ 
tieovereenkomst. Binnen 8 dagen inge¬ 
vuld en geretourneerd geeft deze overeen¬ 
komst recht op 1 jaar garantie. 




Hekel aan krakers 


CCS verklaart elke klandestiene gebruiker 
de "oorlog”. Backups maken voor eigen 
gebruik mag. Stiekem voor anderen kopië¬ 
ren wordt de softwarepiraat behoorlijk 
moeilijk gemaakt. 

In de eerste plaats zijn alle zakelijke pak¬ 
ketten met de bijbehorende licentieover¬ 
eenkomsten en onderhoudskontrakten 
geregistreerd. Belt u CCS voor hulp dan 
vraagt men eerst uw nummer en als dat 
klopt, wordt pas advies of service gebo¬ 
den. Krakers vallen daarbij uit de boot. 
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Een tweede aardige protectiemethode is, 
dat de moederschijf op naam wordt afge¬ 
geven. Op alle zakelijke formulieren voor 
meneer A staat dan ook linksboven in het 
hokje "naam van de boekhouding” meneer 
A. Wil meneer B ook het programma ge¬ 
bruiken dan kan hij de naam van meneer A 
niet wissen zonder het programma onher¬ 
stelbaar te laten crashen. 

Ter beveiliging is verder de moederdisket- 
te van een zegel voorzien en het maken 
van werk-backups eenvoudig gehouden. 
Mocht er iets aan de moederschijf met 
onbeschadigd zegel mankeren dan krijgt u 
onverwijld een nieuw exemplaar. 

Zakelijke programmatuur zal op den duur 
verouderen en u loopt bij geregeld gebruik 
een aantal risico’s. Beide problemen kunt 
u bij CCS ondervangen door het afsluiten 
van een onderhoudskontrakt tegen 10% 
der aanschafprijs per jaar. Gemiddeld 
komt 1 tot 2 maal per jaar een nieuwe 
versie uit en kunt u het oude exemplaar 
voor een recente moederschijf met aanvul¬ 
lende gebruiksaanwijzing omruilen. Dat¬ 
zelfde geldt voor eventuele ongelukken 
met de moederdisk. 

Computer Consultancy Software heeft 
met deze protectiemethodes tot op heden 
nog geen last van Onyx-krakers gehad. 
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OnyxM-Boekhouding- 

Voor de financiële administratie op C 

1 

-128- 


en G-128(d)-machines voert CCS de Onyx- 
versie M in haar repertoire. Het pakket kost 
ƒ 399,- en biedt in vergelijking met veel 
duurdere PC-pakketten echt waar voor 
zijn geld. 

OnyxM geeft op MSX 2 de volledige 80 
tekens op een schermregel. Het systeem 
is opgebouwd uit de samenwerkende mo¬ 
dulen Grootboek en Debiteuren/Credi¬ 
teuren. De hoge mate van integratie elimi¬ 
neert het veel bij andere programma’s 
voorkomende en verfoeide dubbelboe¬ 
ken. Gezien het professionele karakter van 
dit pakket garandeert CCS een voortdu¬ 
rende aanpassing aan nieuwe juridische 
en technische eisen. 

OnyxM is een echt modern boekhoudpak- 
ket en vormt tezamen met het straks te 
bespreken OnyxD het MiniOnyx-systeem 
voor de kleine ondernemer. Er zijn automa¬ 
tische procedures voor het invoeren van 
de boekingen, het afdrukken van het jour¬ 
naal, het printen van rekeningoverzichten 
en de beeldschermgegevens van groot¬ 
boekrekening, saldi en debiteuren / credi¬ 
teuren. Op elk gewenst moment kan een 
balans of een verlies-winstoverzicht opge¬ 
maakt worden. 

Het Nederlandstalige pakket is volledig 


menugestuurd en waakt tegen fouten bij 
het intypen. Slaat u bijvoorbeeld cijfers 
aan als letters gevraagd worden dan zal 
Onyx de desbetreffende invoer gewoon 
weigeren. Printerfouten als niet aangeslo¬ 
ten, afdrukken zonder papier of met een 
versleten lint zijn eveneens beveiligd. Ook 
waakt het programma tegen het invoeren 
van een niet bestaande datum, grootboek¬ 
rekening, post e.d. 

Het aantal in te voeren boekingsregels 
(= mutaties) zijn bij OnyxM behoorlijk 
groot. Het programma houdt tevens reke¬ 
ning met het gebruik van meerdere disk¬ 
drives. De uitvoer naar de Centronics Pa- 
rallel-printer omvat: het Grootboekreke- 
ningsschema, de kontrolelijst mutaties, de 
Balans-Verlies & winstrekening, Groot- 
boekkaartjes, Crediteurenkaartjes, de 
Kontrolelijst Debiteuren, de Kontrolelijst 
Crediteuren en Plaketiketten (adressen). 
Specificaties grootboekadministratie: 
■*-12 vaste tot 500 variabele grootboekre¬ 
keningen. 

w-Maximaal 10.000 (afhankelijk van de 
diskettegrootte) mutaties per periode, 
■r- Input via een centraal boekingsbe- 
stand. 

nr Uitvoer grootboek: proef- en saldiba- 
lans, balans verlies & winst -rekening, 
liquiditeitsoverzicht en rekening- 
kaarten. 

Specificaties debiteuren/crediteuren: 

■*-Automatische updating gelijk met de 
grootboekadministratie. 

>*- Maximaal 500 debiteuren/crediteuren, 
xr Diverse overzichten. 

■*- Rekeningkaarten. 

■*- Plaketiketten. 
w-Relatielijst. 

OnyxM maakt een accountant groten¬ 
deels overbodig. 

V oorr aadFactureriïig 

OnyxD is CCS’s factureringsprogramma 
voor de C-128. Dit pakket biedt vele voor¬ 
delen ten opzichte van bestaande C-128- 
factureringssoftware. Zo kunnen er meer¬ 
dere diskdrives benut en openstaande 
posten verwerkt worden. OnyxD is weer 
volledig Nederlandstalig en menuge¬ 
stuurd, waakt voor bedienings- en type¬ 
fouten en waarschuwt voor de gevolgen 
van schijfwisselingen. 

Het programma bestaat uit twee delen: 
een voorraadadministratie en een direkte 
facturering. Het aantal in te voeren debi¬ 
teuren en artikelen hangt uiteraard van de 
diskcapaciteit af. 

OnyxD is bedoeld om, binnen de beperkin¬ 
gen van een klein computersysteem zoals 
de C-128 , een zo efficiënt mogelijk factu¬ 
rering en voorraadadministratie te kunnen 
voeren. Er zijn automatische procedures 
voor het invoeren van debiteuren en artike¬ 
len, het opmaken van facturen en het 


schrijven van aanmaningen en de uitvoer 
naar printer of beeldscherm. Een uitge¬ 
breid foutmeldingssysteem houdt de in¬ 
voer van gegevens nauwlettend in het oog. 
OnyxD-128 beschikt over de volgende on¬ 
derdelen : 

«*- Debiteurenadministratie; maximaal 
500 debiteuren, openstaande posten, 
inboeken betalingen en de noodzakelij¬ 
ke overzichten. 

•*- Artikelenadministratie; maximaal 1500 
artikelen, 5 staffelprijzen per artikel, au¬ 
tomatisch bijwerken van de voorraad en 

de noodzakelijke overzichten. 

•*- Facturering; automatische doornum- 
mering, invoer van vrije teksten en arti¬ 
kelen, automatische BTW- en kortings- 
berekening, keuze uit vrije of stan- 
daardfactuurteksten, doorboeking naar 
het boekhoudpakket en (tegen een ge¬ 
ringe meerprijs) eventueel aanpassing 
van de standaard lay-out. 

De printer/schermuitvoer omvat: kontrole¬ 
lijst debiteuren, kontrolelijst artikelen, eti¬ 
ketten debiteuren, etiketten artikelen, 
voorraadwaardelijst, prijslijst en facturen. 
Verder koppelt OnyxD volledig met OnyxM 
zodat er rechtstreeks naar de financiële 
administratie kan worden doorgeboekt. 
Kortom een aantrekkelijk pakket voor de 
kleine zelfstandige die voor weinig compu¬ 
ter- en softwaregeld een leuk (maar be¬ 
perkt) voorraad- en factureringssysteem 
zoekt. 

(T - . ' — 

I j HOGFDMENU GROOTBOEK OnyxF j \ 


EG] Grootboekrekeningen 
CM] Mutaties 

CDU Debiteuren/Crediteuren 

CB] Lijsten Grootboek 

CLJ Lijsten Debiteuren/Crediteuren 

Cl] Bestands Informatie 

CS] Stoppen 


| Keuze: C ] 



CCS biedt de C-128-gebruiker in het 
midden- en kleinbedrijf boekhoud- en 
factureringssoftware van formaat. Na¬ 
tuurlijk presteren de C-128-Onyxpak- 
ketten wat minder dan de oorspronke¬ 
lijke PC-uitvoeringen. Voor de kleine 
zelfstandige bieden ze echter opties 
genoeg, zijn gebruiksvriendelijk en ma¬ 
ken goed gebruik van de mogelijkhe¬ 
den van de C-128-machine. Nadere 
informatie bij Computer Consultancy 
Software, Bouwerij 7, 1185 XUAmstel¬ 
veen. m 020-459494. 
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Het bijhouden van wedstrijduitslagen is 
vaak een lastig en bewerkelijk karweitje, 
dat de C-64 of C-128 ook gemakkelijk en 
overzichtelijk zou kunnen doen. VCS heeft 
onlangs het volledig Nederlandstalige 
programma "Competitie” voor het verwer¬ 
ken van wedstrijduitslagen op de markt 
gebracht. 

COMPETITIE 

Volg de competitie 
op uw C-64/C-128 



V olders computer Services 
is geen onbekende op de 
Commodore soft- 

waremarkt. Een electroni- 
sche kaartenbak in C-64- 
en MS-DOS-versie, de boekhoudpro- 
gramma’sVol-Ad(C-64en C-128), Voor¬ 
raad Beheer en Euro-Com leverden 
reeds een welkome bijdrage aan de 
serieuze toepassingsmogelijkheden 
van de C-64 en C-128. Nieuw is het 
programma Competitie 64. 

In Nederland is het bijhouden van wedstrij¬ 
duitslagen tamelijk populair. Niet alleen 
voor het winnen van de toto maar ook uit 
hobbyisme en als fervente aanhanger 
houd je natuurlijk elke wedstrijd bij. Voor 
hen die snel een overzicht op club en 
datum willen hebben is het VCS-program- 
ma Competitie een goede keuze. De ƒ 79,- 
kostende diskette neemt de clubfan of 
-bestuurder veel werk uit handen en maakt 
bovendien nog fraaie uitdraaien op de 
printer, ook belangrijk voor b.v. vereni- 
gingsblaadjes. 

De programmaopzet 

De bedoeling van Competitie is om de 
uitslagen van de in een bepaalde periode 
gespeelde wedstrijden bij te houden en te 
verwerken. Daarbij moeten de gespeelde 
wedstrijden op club en datum opvraag¬ 
baar zijn. 

Competitie houdt de volgende gegevens 
voor u bij: 

■»- De uitslagen per club. 
m-De uitslagen op datum. 

"■De stand qua wedstrijden. 

De stand per datum. 

Het programma kan de per periode ge¬ 


speelde wedstrijden van 20 clubs in de 
peiling houden. Daarbij gaat de auteur P. 
Boone uit van 38 voetbalwedstrijden per 
club. Natuurlijk kunt u ook andere sport¬ 
competities dan voetbal invoeren. 

Via het hoofdmenu kan men naar b.v. het 
utility-menu waarmee men de kleuren kan 
veranderen, de printeropties instellen en 
van datadiskette veranderen. 

Het kleurenmenu maakt het mogelijk om 
de rand-, scherm- en letterkleur op de 
eigen smaak af te stemmen. Bij het printer- 
menu kan de gebruiker kiezen uit de opties 
kleine letter en hoofdletter of via CTRL P 
hoofdletters en grafische tekens. Verande¬ 
ring van datadiskette is noodzakelijk als u 
meerdere competities tegelijk wilt bijhou¬ 
den. Want op één diskette gaat slechts 
één competitie. 

Het invoermenu 

Vanuit het hoofdmenu brengt F3 de ge¬ 
bruiker naar het invoermenu. 

Bij het maken van een nieuwe dataschijf 
dient er eerst een clubschema opgezet te 
worden. Minimaal moeten er 2 clubs en 
maximaal kunnen er 20 verenigingen inge¬ 
voerd worden. De clubnaam mag hoog¬ 
stens 14 letters lang zijn. CTRL E saved de 
clubgegevens op disk. Na het invoeren 
van het clubschema vraagt Competitie 
automatisch om de datum. Is de juiste 
datum ingetypt dan mag de gebruiker de 
desbetreffende uitslagen invoeren. 

Via F3 wordt het invoeren van de 
wedstrijduitslagen gestart met thuisclub, 
tegenstander en aantal goals. 

Het bekijken van uitslagen. 

Het viewmenu van Competitie 64 biedt de 
keuze uit: 


C> Het bekijken van de uitslagen op datum 
(F1). Deze optie geeft de uitslagen van alle 
tot aan een bepaalde datum gespeelde 
wedstrijden. Desgewenst kunnen deze uit¬ 
slagen uitgeprint worden. 

C> Het bekijken van de uitslagen per club 
(F3). Met behulp van de F1- en F7-toets 
selecteert u de juiste club uit het schema 
en een RETURN bevestigt de gemaakte 
keuze. 

0 Het bekijken van de standen op datum 
(F5). Met deze optie kunt u snel zien welke 
club het goed deed of nog doet op de 
gevraagde datum. Het scherm vermeldt 
het aantal gespeelde wedstrijden, het aan¬ 
tal gewonnen wedstrijden, het aantal gelijk 
gespeelde wedstrijden, het aantal verloren 
wedstrijden, het aantal punten, het aantal 
doelpunten voor en het aantal doelpunten 
tegen. Er is geen doelgemiddelde. 
i) Het bekijken van standen op gespeelde 
wedstrijden (F7). Hiermee bepaalt Compe¬ 
titie 64 de stand na x gespeelde wed¬ 
strijden. 

Alle ingevoerde gegevens kunnen vanuit 
het hoofdmenu via F5 uitgeprint worden. 
Het programma test daarbij zelf of de 
afdrukker wel korrekt is aangesloten. 


Competitie is een aardig programma 
voor de clubfan of bestuurder, die niet 
van papierwerk houdt. Behalve voor 
voetbal kan natuurlijk ook voor een 
andere wedstrijdsport gekozen wor¬ 
den. In de loop der jaren kan men zo 
een aardig computer-beeld van het ver¬ 
loop van de clubprestaties opbouwen. 
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Vooral onderwijzend LOGO-minnend Nederland heeft 
reikhalzend uitgekeken naar een Nederlandse versie 
van hun zo geliefde programmeertaal. Eindelijk, hij is er 
dan, de Nederlandse LOGO-schijf. 


Nederlandse 

LOGO 


D e nieuwe Nederlandse LOGO- 
versie van Malmberg draagt als 
ondertitel: Spelenderwijs pro¬ 
grammeren in je eigen taal. 
Nog steeds wordt LOGO gezien 
als een kindertaaltje, leuk, gezellig en 
vooral educatief. Alle drie predicaten 
zijn zonder meer waar, maar LOGO is 
veel meer. LOGO is een der krachtigste 
programeertalen op de kleinere home¬ 
computer, die ik ken. Maar genoeg over 
de waarde van LOGO. Laten we de eer¬ 
ste Nederlandse versie voor de C-64 
eens onder de loep nemen. 

Zoals gezegd is de versie geheel in het 
Nederlands. We hebben wel eens be¬ 
weerd, dat Nederlandstaligheid een voor¬ 
waarde is voor educatieve software. Hoe¬ 
wel kinderen al snel wennen aan de Engel¬ 
se mededelingen naar aanleiding van fou¬ 
ten e.d., is een implementatie, die dat in de 
moedertaal doet, veel werkbaarder. Bij de 
LOGO van Malmberg zijn de commando’s 
voor de verschillende werelden waaruit 
LOGO bestaat, niet alleen erg duidelijk 
vertaald, ook zijn er een aantal toege¬ 
voegd. Die worden in het laadproces van 
de LOGO-schijf in een keer meegeladen. 
Het zijn weliswaar procedures, dus geen 
LOGO taalelementen, maar te maken het 
werken met LOGO erg gemakkelijk. Vooral 
de toevoegingen in de sprokenwereld 
(sprites en animaties) zijn erg nuttig. Ook 
de rompslomp van de filebehandeling 
wordt iets gereduceerd. De woord- en 
lijstcommando’s krijgen eveneens een fik¬ 
se uitbreiding. En in die vlakken liggen 
vaak de belemmerende zaken in het LO¬ 
GO- gebruik. Erg handig dus. 

Alle foutmeldingen komen in het Neder¬ 
lands op het scherm. Ze spreken voor zich. 
Ik zal ze niet alllemaal opsommen. Erg 
goed is de link naar machinetaal en As- 
sembly. Dat laatste is overigens lang geen 



kinderspel. Wie noemde LOGO ook alweer 
een "kindertaaltje” ?? 

Ten eerste is er, zoals in bijna alle LOGO’s, 
de grafische wereld. In LOGO spreekt men 
van werelden van toepassing. Voor velen 
staat deze wereld als synoniem voor LO¬ 
GO. Fout dus. De grafische wereld is erg 
uitgebreid in mogelijkheden, maar zeker 
niet de enige. Direct naast die grafische 
wereld staat de sprokenwereld, waarin het 
gaat om sprites en animatie. Spelletjes en 
dergelijke maak je zelf in deze wereld. Dan 
is een computer natuurlijk ook nog een 
rekenmachine. In de getallenwereld van 
LOGO kan je de meest verbluffende bere¬ 
keningen maken. 

Ook het zelf maken van taalspelletjes (en 
verder alles wat met woorden en zinnen te 
maken heeft) behoren tot de mogelijkhe¬ 
den in de taalwereld van LOGO. En omdat 
de C-64 een muzikaal hart heeft (maar 
liefst 4 synthesizers!), is er ook nog een 
muziekwereld in de Nederlandse LOGO 
van Malmberg. Het kan niet op. Natuurlijk 
staan de werelden niet op zich. Ze kunnen 
naar hartelust worden gecombineerd. 

En nu even terug naar het eerste deel van 


INZENDVOORW AARDEN 


Programma’s en artikelen kunnen aan de 
redactie van Commodore-lnfo, PB 112, 
1260 AC te Blaricum met vermelding RE¬ 
DACTIE Cl, worden ingezonden en worden 
eventueel geplaatst, waarbij de inzender 
een door de redactie te bepalen vergoe¬ 
ding ontvangt. Vermeld altijd naam, adres 
en vooral telefoonnummer. Alleen Listings, 
waarvan een cassette of diskette beschik¬ 
baar is, komen in aanmerking. 

Gezien het relatief grote aantal inzendin¬ 
gen kan verwerking enige tijd op zich laten 
wachten. Indien we zeker niet tot plaatsing 
overgaan, ontvangt men de inzending re¬ 


tour, eventueel houden we het nog enige 
tijd als reserve. 

SAC behoudt zich het recht voor, er redac 
tionele wijzigingen in aan te brengen. Door 
inzending accepteert men, dat bij plaat 
sing alle publikatierechten, ook in electro- 
nische vorm, op de uitgever van het blad 
overgaan en dat men het blad vrijwaart van 
aanspraken van derden, bijvoorbeeld om¬ 
dat het programma eigenlijk van een ander 
is of bv. deels of geheel uit een ander blad 
is overgenomen. Het overnemen van lis¬ 
tings door lezers is toegestaan, maar ver¬ 
koop van die listings, in welke vorm ook, 
aan derden is voorbehouden. m 




mijn verhaal. Een kindertaaltje ? Kom nou I 
Menig volwassene kan zijn computerhart 
ophalen aan LOGO. Wel is het een taal, 
waar kinderen uitstekend mee overweg 
blijken te kunnen, in tegenstelling tot bij¬ 
voorbeeld BASIC. Misschien zit daar dan 
ook wel de verwarring in, die leidde tot het 
genoemde etiket van LOGO. 

Maar nu terug naar het LOGO-pakket zelf. 
Zo op het eerste gezicht lijkt het LOGO 
pakket erg aan de prijzige kant. Dat is het 
ook wel, maar als je ziet, waarvan de 
LOGO-schijf vergezeld gaat, kom je toch 
op andere gedachten. Een zeer goed ver¬ 
zorgd cursusboek met allerhande voor¬ 
beelden, uitleg, overzichten en literatuur 
mag de prijs (beneden de 170 gulden) 
rechtvaardigen. De eerste versie die wij 
zagen bevatte helaas nog wat zet- en 
drukfoutjes, maar we zijn bereid dat voor 
lief te nemen. We zijn veel te blij, dat de 
Nederlandse LOGO er nu is. Toch wel 
jammer, dat het weer om een schijf gaat, 
zodat de meeste C-64 gebruikers versto¬ 
ken moeten blijven van deze prachtige 
programmeertaal. Misschien iets voor 
Malmberg om eens aan te denken. • 
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In dit nummer van Commodore Info beginnen we een cursus machinetaal voor de 
Commodore 64 (VIC 20 en C-16 in mindere mate). De cursus zal zijn gericht op mensen 
die redelijk uit de voeten kunnen met Basic of een andere hogere programmeertaal. In 
tegenstelling tot de serie "Programmeren in machinetaal” zal het dus geen artikelen¬ 
reeks over losse onderwerpen worden, maar een echte cursus. Wel zullen veel 
onderwerpen uit de serie weer aan bod komen, maar dan op halve snelheid en 
didactisch wat meer verantwoord. We zullen in deze eerste aflevering o.a. zien dat de 
chip die je met machinetaal kunt programmeren, de microprocessor, eigenlijk niets 
anders is dan een paar honderdduizend aan/uit- schakelaars. 


Schakelaars, 
microprocessor en 
geheugen. 


Cursus machinetaal 


Deel 1 

door Sjoerd Bakker 




achinetaal is de taal waarmee je de hersenen van de computer, de 
microprocessor, opdrachten kunt geven. Voordat we het echter 
gaan hebben over de 56 verschillende opdrachten waaruit die taal 
bestaat, moeten we eerst iets weten over hoe de processor nu 
eigenlijk in elkaar zit. En dan bedoelen we niet alle details, maar 
wel de grote lijnen. Machinetaal is namelijk een erg "technische” taal. 


Ze is bedoeld om de onderdelen waaruit 
de computer bestaat, zoals de beeldchip 
en het geheugen, direkt te kunnen bestu¬ 
ren. Dit in tegenstelling tot Basic en andere 
hogere talen, die dat soort dingen zelf 
uitzoeken en de programmeur er niet mee 
lastig vallen. In feite laat Basic de proces¬ 
sor voor de uitvoering van elke Basic- 
opdracht, zonder dat je het merkt, een 
groot aantal van die technische machine- 
taal-opdrachten uitvoeren. Een enkele Ba¬ 
sic- opdracht heeft al gauw de uitvoering 
van honderden machinetaal- opdrachten 
als gevolg. En dat gaat dan niet op de 
manier van "Print een zin”, maar "Kijk waar 
de zin in het geheugen staat, haal de eerste 
letter, test of het een besturingsteken is, 
zoek uit of het scherm moet scrollen, be¬ 
kijk waar de letter op het scherm moet 
staan, zet de letter in die plaats van het 


schermgeheugen, haal de tweede letter, 
etc., etc.”. Weet dus waar je aan begint! 
Machinetaal geeft je de toegang tot de 
kleinst mogelijke stap die de computer kan 
zetten, maar je moet zelf wel al die stappen 
een voor een bedenken. 

Machinetaal zit dus als het ware een ni¬ 
veau onder het Basic- peil. Maar het "bin¬ 
nenste van de microprocessor”-niveau 
waar we het (alleen) in deze aflevering over 
gaan hebben zit weer een niveau onder het 
machinetaal-niveau. Een Basic-opdracht 
bestaat in feite uit een aantal machinetaal- 
opdrachten en een machinetaal-opdracht 
bestaat in feite uit...? Daar gaan we dan. 

Elektrische stroom en 
schakelaars 

Zoals bekend wordt de computer gevoed 
door elektrische stroom. De netspanning 


van 220 Volt wordt door een transformator 
teruggebracht tot een 5-Volts "computer- 
spanning”. Deze spanning wordt gemeten 
ten opzichte van de aarde-aansluiting, die 
in elektronika-schema’s wordt weergege¬ 
ven door een omgekeerde T met twee 
streepjes eronder. De elektrische stroom 
zal geneigd zijn te vloeien van de 5 Volts- 
aansluiting naar de aarde-aansluiting, die 
elektrisch neutraal is (0 Volt). De stroom zal 
natuurlijk alleen vloeien als de stroomkring 
gesloten is; d.w.z. door een geleidende 
(koper-)draad die nergens is onderbroken. 
Door nu schakelaars in de stroomkring op 
te nemen kan de stroom op verschillende 
manieren worden gemanipuleerd. 
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De bovenste tekening illustreert een elek¬ 
triciteitsdraad die op drie plaatsen door 
open/dicht-schakelaars is onderbroken. 
Er zal alleen stroom van de 5-Volts aanslui¬ 
ting naar de aarde vloeien als alle drie de 
schakelaars dicht zijn. Deze voorwaarde 
voor het optreden van stroom noemt men 
ook wel een EN-funktie (Engels: AND). De 
funktie heeft deze naam omdat schakelaar 
1 en 2 en 3 alledrie dicht moeten zijn om 
stroom te laten vloeien. 

Onder deze tekening zien we de voorstel¬ 
ling van een OF-funktie (Engels: OR). De 
draad splist zich bij de voeding in drieën en 
die afsplitsingen komen bij de aarde weer 
samen. Minstens één van de drie schake¬ 
laars moet dicht zijn om stroom te doen 
vloeien. De naam komt natuurlijk van het 
feit dat schakelaar 1 of 2 of 3 dicht moet 
zijn voor het vloeien van stroom (meerder 
dichte schakelaars is natuurlijk ook goed). 
Er bestaan nog veel meer van dergelijke 
zgn. logische funkties. Deze zijn echter 
zonder diepergaande kennis van de elek- 
tronika niet zo gemakkelijk te begrijpen 
aan de hand van een schema, dus laten we 
het hier bij. Met een enkele logische funktie 
op zich kunnen we natuurlijk weinig doen. 
Maar als we er een aantal van combineren 
wordt het al snel anders. 



W 


Het volgende elektriciteits-schema maakt 
het mogelijk om de getallen 1,2 of 3 te 
vermenigvuldigen met 1,2 of 3. Links in het 
schema zien we drie schakelaars die het te 
vermenigvuldigen getal kunnen voorstel¬ 
len en rechts drie andere schakelaars voor 
de vermenigvuldiger. Van de linker en de 
rechter groep schakelaars mag er telkens 
maar één schakelaar open zijn. Zowel de 
normale als de gestippelde lijnen dient 
men zich voor te stellen als ononderbro¬ 
ken koperdraden. Waar lijnen met elkaar in 
verbinding staan zien we een bolletje. De 
andere lijnen die elkaar kruisen maken 
geen kontakt met elkaar. De ene lijn loopt 
dan onder de andere door. In het midden 
van het schema zien we negen genummer¬ 


de rondjes. Deze stellen lampjes voor, die 
het resultaat van een bepaalde vermenig¬ 
vuldiging kunnen aangegeven. Als voor¬ 
beeld zullen we nu eens gaan bekijken wat 
er gebeurt als we de getallen 2 en 3 met 
elkaar willen vermenigvuldigen. We zetten 
daarvoor schakelaar 2 aan de linker- en 
schakelaar 3 aan de rechterkant dicht. Er 
kan dan stroom vloeien over schakelaar 2 
(links) naar de kruising van de stippellijnen. 
Omdat schakelaars 1 en 2 (rechts) beide 
open staan kan er geen stroom naar boven 
of naar rechts optreden. Schakelaar 3 
(rechts) staat echter dicht, dus de stroom 
gaat vanaf de kruising naar beneden en 
vervolgens naar rechts en via lampje 6 
naar de aarde- aansluiting van de dichte 
schakelaar. Daardoor begint lampje 6 nu 
te branden. 2*3 = 6; dus dat klopt! 
Probeer zelf ook andere vermenigvuldigin¬ 
gen uit en je zult zien dat het altijd werkt. 
Hieruit blijkt dat het mogelijk is om uit de 
simpele EN- en OF- funkties meer ingewik¬ 
kelde bewerkingen samen te stellen. Een 
microprocessor bestaat geheel uit derge¬ 
lijke funkties. Alleen zijn het er nu niet 
enkele, maar honderdduizenden. De funk¬ 
ties zijn vanzelfsprekend samengevoegd 
tot zinvolle gehelen, zoals optellen, aftrek¬ 
ken en logische bewerkingen. De schake¬ 
laars in een microprocessor worden echter 
niet met de hand bediend, maar elektrisch. 
Zo’n elektrische schakelaar noemen we 
een transistor. De behandeling van de 
transistor valt echter buiten het kader van 
dit blad, en geïnteresseerden verwijs ik 
dan ook naar het "Handboek halfgelei¬ 
ders” van J.H. Jansen. 

Microprocessor en geheugen 

Nu we ongeveer weten hoe een micropro¬ 
cessor in principe werkt, wordt het tijd om 
de belangrijke relatie tussen de processor 
en het geheugen eens te bekijken. Het 
geheugen van de computer dient, net als 
het geheugen van de mens, om gegevens 
in op te slaan. Die gegevens bestaan uit 
opdrachten en data-informatie voor de mi¬ 
croprocessor. Ze worden in de vorm van 
elektrische nullen (0 Volt) en enen (5 Volt) 
bewaard. Met een 0 kun je een elektroni¬ 
sche schakelaar dicht zetten, en met een 1 
gaat hij open. Door nu informatie van het 
geheugen te transporteren naar de pro¬ 
cessor kun je hem vele opdrachten na 
elkaar laten uitvoeren, op dezelfde manier 
waarop we in het lampjes-schema verme¬ 
nigvuldigingen lieten uitvoeren door het 
dichtzetten van twee schakelaars. Het eni¬ 
ge verschil is dat de schakelaars in het 
geval van de processor elektrisch open en 
dicht worden gezet. Het geheugen van de 
Commodore 64 bestaat uit ruim 65.000 
zgn. geheugenplaatsen. Over hoe deze 
geheugenplaatsen er uit zien hebben we 
het in de volgende aflevering. Nu moeten 


PROCESSOR I I GEHEUGEN 


we alleen twee kenmerken van de geheu¬ 
genplaatsen goed onthouden. Ten eerste 
bevat elke afzonderlijke geheugenplaats 
een "waarde” tussen 0 en 255. De waarde 
die in een bepaalde geheugenplaats staat 
noemen we de inhoud van de geheugen¬ 
plaats. En ten tweede zijn de ongeveer 
65.000 geheugenplaatsen elk hun eigen 
nummer. In de computertaal noemen we 
zo’n nummer ook wel het adres van een 
geheugenplaats. Dit adres dient natuurlijk 
om onderscheid te kunnen maken tussen 
al die geheugenplaatsen. We hebben het 
dan bijvoorbeeld over de inhoud van ge¬ 
heugenplaats 100 die gelijk is aan 6, of de 
inhoud van geheugenplaats 65432 die ge¬ 
lijk is aan 255. 

Om de microprocessor iets te laten doen 
moeten we hem een opdracht geven. Die 
opdrachten staan achter elkaar in het ge¬ 
heugen. En net zoals Basic-opdrachten 
samen een programma kunnen vormen, 
maken ook verschillende machinetaal-op- 
drachten samen een programma. Omdat 
de geheugenplaatsen alleen waardes van 
0-255 kunnen bevatten komt elke machi- 
netaal-opdracht overeen met zo’n waarde. 
De waarde 105 in een bepaalde geheugen¬ 
plaats is dan bijvoorbeeld de code voor de 
opdracht "optellen”, en de waarde 219 
betekent "aftrekken”. 

Het zal duidelijk zijn dat de processor, om 
opdrachten in het geheugen uit te kunnen 
voeren, met het geheugen in direkte ver¬ 
binding moet staan. Daarom lopen er tus¬ 
sen de processor en het geheugen twee 
verzamelingen lijnen (elektriciteits-dra- 
den). De ene verzameling wordt de data- 
bus genoemd en de andere de adresbus. 
Over de databus kunnen opdrachten van 
het geheugen naar de processor worden 
gestuurd. De waarde in een geheugen¬ 
plaats bestaat namelijk uit 8 "0 of 1-span¬ 
ningen”, waarmee je de ingangsschake- 
laars van de processor open of dicht kunt 
zetten. De databus telt daarom 8 lijnen. 
Over de adresbus, die 16 lijnen telt, kan op 
dezelfde manier het adres van een volgen¬ 
de keer nog terug op het hoe en waarom 
van het geheugen. De gang van zaken is 
nu als volgt. De processor verstuurt van 
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Munter on the Mississippi 


ADRES 

INHOUD 

OPDRACHT 

0 

169 

HAAL WAARDE OP 

1 

17 

DATA-WAARDE 1 

2 

105 

TEL OP 

3 

9 

DATA-WAARDE 2 

4 

133 

ZET WAARDE WEG 

5 

10 

ADRES-WAARDE 

6 

0 

EINDE 

VOORBEELD-PROGRAMMA 


een bepaalde geheugenplaats het adres 
over de adresbus naar het geheugen. Dit 
heeft tot gevolg dat het geheugen automa¬ 
tisch de inhoud van die geheugenplaats 
over de databus naar de microprocessor 
stuurt. Daardoor worden de ingangsscha- 
kelaars van de processor open of dicht 
gezet, wat de uitvoering van een bepaalde 
opdracht betekent. Omgekeerd kan de 
processor ook een waarde naar een be¬ 
paalde geheugenplaats versturen. Daar¬ 
voor zet hij het adres van de geheugen¬ 
plaats weer op de adresbus, en zet vervol¬ 
gens de te versturen waarde op de data¬ 
bus. Het geheugen haalt de waarde van de 
databus af, en zet deze in de aangegeven 
geheugenplaats. 


Moord op de Mississippi 

Het adventure Murder on the Mississippi 
speelt zich af in de romantische tijd van 
raderboten op de Mississippi-rivier. De 
luxe Delta Princess heeft zojuist St. Louis 



verlaten en een onverlaat blijkt de passa¬ 
gier in hut nummer 4 gekeeld te hebben. 
Werk aan de winkel voor de Engelse su¬ 


perdetective Sir Charles Foxworth en 
diens assistent Regis Phelps. 

U kruipt in de huid van Sir Charles en voelt 
de acht potentiële verdachten duchtig aan 
de tand. In tegenstelling tot vele andere 
misdaadadventures is het spel geheel joy¬ 
stick- en menugestuurd. De speler hoeft 
geen enkel woord in te typen. Bovendien 
functioneert de joystick ook nog eens als 
pen (zet de belangrijkste ”clues” weg) voor 
het electronische notitieboekje van de 
speurder. 

Meent u de ware dader gevonden te heb¬ 
ben dan zal Sir Charles deze beschuldi¬ 
ging met bewijzen moeten kunnen staven. 
Murder on the Mississippi is een van de 
betere crime-adventures voor de C-64/C- 
128 met goede graphics en sfeervol ge¬ 
luid. Het spel kost op diskette ƒ 60,- via 
Ariolasoft. 

• 


De Micro-Drukker © 

Desktop Publishing Servite 


Roelof Hartstraat 27, 

Amsterdam 

020-644659 


Wilt u de kwaliteit van uw tekstwerk verbeteren, zelf uw 
layouts van formulieren, rapporten en presentaties bepa¬ 
len, dan is Desktop Publishing met een microcomputer en 
geavanceerde afdrukmethoden de snelste, meest flexibele 
en goedkope oplossing. De Micro-Drukker maakt dat voor 
u mogelijk, zonder dat investering in laserprinters, soft¬ 
ware, bijzondere beeldschermen en dergelijke nodig is. 
Maak nu snel zelf uw professioneel uitziend tekstwerk, 
eventueel met grafieken of gedigitaliseerde afbeeldingen of 
logo’s op onze apparatuur, met professionele assistentie en 
de beste software op dit gebied. Ook voor de preproduktie 
van uw zakelijk en reclamedrukwerk een uitkomst, waar 
geen dure vormgever meer aan te pas hoeft te komen, u 
experimenteert nu zelf flexibel met lettertypen, vorm en 
opmaak, en ziet het eindresultaat in near-typeset kwaliteit. 
Vermenigvuldigen per fotokopieerapparaat of door de snel- 
drukker levert dan snel en goedkoop een verrassend goed 
resultaat tegen een fractie van de kosten. 


Er zijn mogelijkheden voor speciale tutorials, floppy con¬ 
versie, cursussen tekstverwerking, alles op razendsnelle 
PC AT’s, zodat ook uw tijd optimaal produktief is. 

Wij verwerken teksten van vele microcomputers, zoals 
Commodore C-16, C64, C-128, MSX, CP/M en natuurlijk 
MS-DOS systemen en zetten die zo nodig om naar een 
standaard formaat. Het resultaat ziet er uitmuntend uit, 
maar de teksten zijn eventueel ook door te sturen naar 
fotozetapparatuur. Naast prints op de laserprinter zijn ook 
goedkopere WYSIWYG afdrukken mogelijk voor testruns. 
Met onze exclusieve Micro-Zetter ® software zorgt u zelf 
voor een perfecte afhandeling 


Ook conversie vanaf Easyscript. 

C-ê4 files naar IBM en laserprinter. 


De Micro-Drukker biedt pagina-opmaak en laser-afdruk 
service per pagina en per uur. 












Batteries Included is een van de actiefste Noord-Amerikaanse softwarehuizen. Sinds 
1979 opereert de ”Energized Software Company” met succes op de huiscomputer- en 
sinds kort ook op de serieuze PC-markt. Pakketten als HomePak, PaperClip en The 
Consultant zijn inmiddels een begrip in de softwarewereld geworden. 


BATTERIES INCLUDED 

The Enereized Software Company ^ 

0 JT «/ BATTERIES 

INCLUDED 


H et Canadese softwarehuis Bat¬ 
teries Included is een echt fami¬ 
liebedrijf. De familie Krofchick, 
Alan, Robbie en Marcie, begon 
in 1978 in Toronto een winkel in 
rekenmachines, digitale horloges, 
draagbare videogames en de eerste ho¬ 
mecomputers. Ook in het daaruit ge¬ 
groeide softwarehuis worden alle werk¬ 
nemers nog als een grote familie, de 
”Good People Team", gezien. 

Vele concurrenten van de Krofchicks elec- 
tronicawinkel verkochten hun produkten 
zonder batterijen. In kleine lettertjes op het 
prijskaartje kon de consument dan ”batte- 
ries not included” lezen. Een feit dat de 
Krofchiks aan hun kinderjaren deed den¬ 
ken waar de geliefde electrische treintjes 
ten gevolge van lege batterijen niet liepen. 
Dat wilde men voorkomen en vandaar de 
naam : BATTERIES INCLUDED. 

Toen de markt voor microcomputers zich 
in Noord-Amerika explosief ging ontwikke¬ 
len besloten de Krofchicks samen met 
Lindsay Swartz een softwarehuis op te 
richten. De nog jonge firma oriënteerde 
zich aanvankelijk op software voor thuis, 
school en kantoor. Volgens deze markt¬ 
strategie kwamen de Commodore toppers 
Paperclip (tekstverwerker) en The Consul¬ 
tant (database) uit de ontwikkelkoker. Ook 
werden er een aantal vrij bekende "grafi¬ 
sche” printer-interfaces op de markt ge¬ 
bracht, die ook in ons land veel verkocht 
zijn. De laatste jaren richt de firma zich 
naast de Commodore huiscomputers ook 
sterk op MS DOS-systemen en de Amiga 
en op de Atari ST. 



Het programma Homepak bijvoorbeeld is 
erin een C-64 versie, maar ook voor vrijwel 
alle andere machines. Het biedt een inte¬ 


gratie van drie pakketten in één, namelijk 
tekst, database en telecommunicatie. Dit 
pakket is meermalen onderscheiden o.a. 
met Infoworld’s BEST BUY award. 



Voor de 128 heeft men ook speciale ver¬ 
sies, bijvoorbeeld van Homepak en ook 
Paperclip I1128 met een 20.000 woorden 
spellingschecker, meer geheugenruimte, 
macro’s en "expanded maximum docu¬ 
ment size”, maar wel file-compatibel met 
de 64 Paperclip. 

Batteries Included’s software onder¬ 
scheidt zich door pakketten die iedereen 
direkt kan gebruiken, het inclusief zijn van 
de benodigde operating systems en ac¬ 
cessoires, en de uitvoerige documentatie. 
In Noord-Amerika biedt het softwarehuis 
bovendien nog een uitgebreide hulpdienst 
voor klanten die alsnog problemen onder¬ 
vinden. 

Momenteel werken er bijna 100 mensen in 


de Canadese vestiging te Richmond Hill, 
Ontario en in een dependance in Irvine, 
California. Dat mag op het eerste gezicht 
niet veel lijken, maar met minder dan 100 
medewerkers slaagde de Energized Soft¬ 
ware Company (een zelf verzonnen bij¬ 
naam) er in in 1985 een omzet van $20 
miljoen te behalen. 

De organisatie 

Batteries Included kent vijf belangrijke af¬ 
delingen waaronder een voor produktont- 
wikkelling, een voor produktie en opslag, 
een klantenserviceafdeling. Het soft¬ 
warehuis is een van de weinige leveran¬ 
ciers die in Canada en de VS over een 
goede klantenservice-afdeling beschikt. 
Elke vraag, hoe simpel of ingewikkeld 
ook wordt altijd behandeld en beant¬ 
woord. Daarvoor heeft men zelfs een 24 
uur bereikbaar electronisch bulletin bo¬ 
ard opgericht. 

Ook geeft Batteries Included een eigen 
nieuwsbrief uit, de Recharger (= oplader 
van batterijen), en onderhoudt veel kon¬ 
takten met de detailhandel. 
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”Wij zijn onze produkten” 

Op het eerste gezicht een wat gepeperde 
uitspraak. Toch blijkt al gauw dat Batteries 
Included niet zomaar wat software op de 
markt dumpt. Het softwarehuis staat volle¬ 
dig achter elke produkt-release. 

De uit te brengen software dient aan stren¬ 
ge kwaliteits- en markteisen te voldoen: 
«•- De werking dient gebruiksvriendelijk te 
zijn. 

•*- Een programma behoort ook echt nuttig 
voor de toekomstige gebruiker te zijn. Een 
oogmerk dat bij een aantal andere soft¬ 
warehuizen helaas nogal eens ontbreekt. 
■*- Het produkt moet vlekkeloos werken en 
zo mogelijk fooi proof zijn. 
w Aandacht voor de persoonlijke "touch” 
met een prettig leesbare en duidelijke 
handleiding voorzien van een foto van de 
softwareauteur. 

«*• Het te ontwikkelen softwarepakket 
dient een breed toepassingsgebied te 
hebben en voor een zo groot mogelijke 
markt aantrekkelijk zijn. 

Alle pakketten worden in nauwe samen¬ 
werking tussen de ontwikkelings- en mar¬ 
ketingafdeling gemaakt en uitgebracht. 
Over Paperclip gaat zelfs de anekdote dat 
de verkoopafdeling al haar overredings¬ 
kracht moesten gebruiken om de al te 
enthousiaste softwareontwerpers er van 
te weerhouden deze tekstverwerker tot in 
het extreme te perfectioneren. Anders zou 
Paperclip nooit op tijd gereed gekomen 
zijn. 

Vanouds heeft Batteries Included de Com¬ 
modore softwaremarkt bewerkt. En nog 
steeds verkoopt zij ca. 60% van haar pro¬ 
dukten aan de C-64/C-128 thuiscompute- 
raar. Met name de tekstverwerkers, kleine 
administratieve en/of geintegreerde (bij¬ 
voorbeeld HomePak) pakketten, spread¬ 
sheets, databases en telecommunicatie 
software mogen zich in een grote belang¬ 
stelling van hobbyisten en serieuze thuis¬ 
gebruikers verheugen. Ook in het Noord- 
Amerikaanse onderwijs, 25% van de om¬ 
zet, spreekt het Canadese softwarehuis 
een duchtig woordje mee. Ondermeer met 
geografische, literaire, word processor en 
taal/rekencursus pakketten. 



Het managementteam van BI: Robbie Krof- 
chick, Marde Schwartz en Alan Krofchick 
(v.l.n.r.). 


Weg met de piraten 

Batteries Included heeft een grondige he¬ 
kel aan softwarepiraten. In tegenstelling 
tot het softwarehuis Borland, levert onbe¬ 
schermde software tegen een lage prijs 
met een lastig kopiëerbaar handboek, pro¬ 
beert BI haar produkten op elke mogelijke 
wijze tegen ongeautoriseerd dupliceren te 
beschermen. De juridische afdeling ziet 
gerechtelijke actie tegen krakers zelfs als 
een noodzaak om te kunnen overleveren. 



BI’s „Good People” Team. 


In haar beleidspolitiek probeert Batteries 
Included eerst de vriendelijke manier. 
Goede service, een redelijke prijsstelling 
en verklarende teksten omtrent de gevol¬ 
gen voor het bedrijf van klandestien kopië¬ 
ren werken behoorlijk preventief. Diskettes 
waarvan het maken van backups noodza¬ 
kelijk kunnen zo onbeschermd geleverd 
worden. Een tweede goede methode is het 
onderbrengen van een noodzakelijk deel 
van het besturingssysteem in een aparte 
insteekchip (in de vorm van een joy- 
stickplug of cartridge, een z.g.n.dongle). 
De moeite en kosten om dergelijke protec- 
tiechips na te maken zullen vele commer¬ 
ciële krakers ontmoedigen. 

Helpt er echt niets meer dan schuwt BI het 
aanklagen van de desbetreffende delin- 
kwenten niet. Zo ver komt het gelukkig 
meestal niet. 

Commodore software 

Wij beperken ons hier tot een overzicht van 
de belangrijkste Commodore en MS-DOS 
software: 

★ De tekstverwerker PaperClip in de C- 
64/C-128, MS DOS en binnenkort ook in 
de Amiga-versie. In de nieuwste Elite-uit- 
voering zitten naast alle gangbare word 
processor faciliteiten ook een real-time 
spelling checker, tekst en "graphics” inte¬ 
gratie en een idee-processor. 

★ De database Manager The Consultant 
voor de C-64/C-128 en MS DOS syste¬ 
men. Met o.a.: 10 ingebouwde templates 

I voor de functies Inventory, Budgets, Mai¬ 
ling Lists Catalogues enz.; uitgebreide ma- 
kro/commando invoer; de zoekoperatoren 
gelijk aan, groter dan, kleiner dan, niet 
gelijk aan, Wild Cards en Match Anywere, I 
full screen editing en ingebouwde calcu- | 


lator. 

★ Het geïntegreerde pakket HomePak be¬ 
staande uit het HOMETERM X-Modem 
protocol communicatiemodule, de HOME- 
TEXT tekstverwerker en de HOMEFIND 
database manager. Ideaal voor de thui- 
scomputeraar die veel berichten en/of da¬ 
ta verzendt en ontvangt. 



★ Het communicatieprogramma l*S Talk 
voor MS DOS machines met twee drives. 
Het programma werkt via het X-modem 
protocol en beschikt o.a. over een HELP- 
venster per gebruikersfunctie, een basis¬ 
tekstverwerker, een ingebouwde 50.000 
woorden spelling checker, GEM-bestu- 
ring, uitgebreide editing mogelijkheden, 
makro-keys en een 300.000 bytes geheu¬ 
gen buffer. 

★ De spreadsheet Cal-Kit voor de C-64/C- 
128. Een gebruiksvriendelijk pakket met 
meer dan 20 toepassingstemplates voor 
het definiëren van rijen, kolommen en be¬ 
rekeningen. 


Portfolio 

SYSTEM 

★ Het beursanalyse pakket Isgur Portfolio 
voor het beheer van uw aandelenporte¬ 
feuille op de MS DOS PC10/PC20 of 
Amiga. 

★ Het financieel plannings- en tijdsmanag- 
mentspakket l*S Time onder GEM-bestu- 
ring op de PC of Amiga. O.a. met de 
mogelijkheid om de markt/produktiekos- 
ten te kunnen analyseren. 

★ De BI C-128 monochroom mónitor-ad- 

apter om op elke standaard monochrome 
of kleurenmonitor toch 80 kolommen te 
kunnen gebruiken. • 


Batteries Included is een energiek soft¬ 
warehuis met een goede reputatie. De 
reeds ontwikkelde en in Nederland ver¬ 
kochte pakketten voorde Commodore 
machines zijn van goede kwaliteit en 
zeker interessant, vooral nu de serieuze 
markt sterk aantrekt. Voor nadere infor¬ 
matie kunt u terecht bij Batteries Inclu¬ 
ded, 30 Mural Street, Richmond Hill 
Ontario, L4B IBS Canada en uw eigen 
softwareleverancier. De BI produkten 
worden door Ariolasoft (023-319290) 
geïmporteerd. Men heeft nu ook Ne¬ 
derlandstalige versies van Paperclip en 
Homepak. 
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Programma’s laden is een dagelijkse bezigheid voor iedere computergebruiker. Bij 
aangekochte software geeft dit geen problemen. ”LOAD” en ”RUN” laten je onbezorgd 
genieten van het programma. Zelfs bij een modulaire opbouw (het programma staat in 
meerdere delen op disk of cassette) worden alle onderdelen 'vanzelf op de juiste 
plaats in het geheugen geladen. Maar hoe werkt dat in je zelfgeschreven program¬ 
ma’s? Rudi Kusters over dit tamelijk zware onderwerp. 

LADEN & SCHRIJVEN 


door: Rudi Kusters 


Z odra je wat beter thuis raakt in 
het programmeren en je pro¬ 
gramma’s een grotere omvang 
krijgen, blijkt al gauw dat de 38 kB 
BASIC-geheugenruimte van de 
64 niet erg veel is. Vooral niet als je veel 
variabelen te verwerken hebt. 

Bovendien is het POKEn van data uit DA- 
TA-regels bewerkelijk en tijdrovend. Dit 
alles kan een bron van ergenis worden. 
Om bij het toekomstige programmeerwerk 
je aandacht volledig te kunnen richten op 
de INHOUD van je programma’s, wordt 
hier ingegaan op de ORGANISATIE van 
het werkgeheugen en de modulaire OP¬ 
BOUW van (BASIC-) programma’s. De bij 
dit artikel afgebeelde voorbeeldprogram¬ 
ma’s en de genoemde geheugenadressen 
gelden voor de Commodore 64. Verder 
wordt uitgegaan van het werken met een 
diskdrive. Het is echter niet al te moeilijk 
deze te bewerken voor andere computers 
of voor het werken met cassette. 



Organisatie 

In veel boeken vind je een overzicht van de 
geheugenindeling van de 64. Figuur 1 
geeft een variant hierop. In dit figuur is 
aangegeven welke geheugenblokken be¬ 
schikbaar zijn bij het programmeren in 
BASIC. Dit zijn: 

- 38 kB ($0800-$9FFF): dit is de plaats voor 
BASIC-programma’s, variabelen, data- 
blokken (hiresschermen, sprites, karakter¬ 
sets en dergelijke) en eventueel machine- 
taalroutines; 

- 4 kB ($C000-$CFFF): een apart RAM- 
geheugenblok dat bij uitstek geschikt is 
voor machinetaalroutines; 

- 196 bytes ($033C-$03FF): de cassette- 
buffer plus 4 niet-gebruikte geheugenloka- 
ties; werk je alleen met diskdrive dan kun je 
deze ruimte gebruiken om een directoryle- 
zer of andere (korte) machinetaalroutines 
te plaatsen; 

- 1000 bytes ($0400-$07E7): het scherm- 
geheugen; bij een programma met een 
lange laadtijd kun je eerst een scherm 
direct in het schermgeheugen laden, bij¬ 
voorbeeld met je logo erop. Voor de laatste 
drie geheugenblokken is het gebruik al 
door de aard (en de omvang) vastgesteld, 
hoewel een goede organisatie van machi¬ 
netaalroutines in de 4 kB RAM ($C000- 
$CFFF) noodzakelijk is. Het meeste orga- 
niseerwerk zit echter in het 38 kB BASIC- 
werkgeheugen. 

4 KB Machinetaal 

Zoals de meeste (amateur-) BASIC-pro- 
grammeurs weet ik net genoeg van machi¬ 
netaal om met een monitor te kunnen 
werken en een bestaande routine aan te 
passen aan mijn eigen behoeften. Op een 
heldere dag lukt het ook nog een eenvou¬ 
dige routine in elkaar te zetten. Gelukkig 
komen in COMMODORE-INFO genoeg 
ML-programmeurs aan het woord die al¬ 
lerlei nuttige zaken in de vorm van datala- 
ders aanbieden. Maak uit dit aanbod een 


keuze, zet de routines die je bij je BASIC- 
programma kunt gebruiken met behulp 
van een ML-monitor netjes achter elkaar 
en schrijf deze verzameling in een keer 
weg naar disk. Zo zijn alle gebruikte routi¬ 
nes straks met één opdracht : 
LOAD”ML-ROUTINES”,8,1 
weer op de juiste plaats in het geheugen te 
laden, zonder eindeloos te moeten wach¬ 
ten op het POKEn van DATA-regels. 

Basic-werkgeheugen 

Dit geheugenblok kan een grote verschei¬ 
denheid in toepassingen laten zien: 

BASIC-programma begin adres: 

256*PEEK(44) + PEEK(43) 
eind adres : 256*PEEK(46)+PEEK(45)-1 - 
BASIC-variabelen begin adres: 

256*PEEK(46)+PEEK(45) 
eind adres : 256*PEEK(56)+PEEK(55) 

- Machinetaal routines 

- Datablokken voor karaktersets, sprites, 
hiresscherm. 

Het BASIC-programma en de BASIC-vari¬ 
abelen laten we als een geheel in het 
geheugen. De plaats voor machinetaalrou¬ 
tines en datablokken is of voor het begin 
van het BASIC-programma of achter het 
einde van de BASIC-variabelen. Om niet al 
te veel pointers te hoeven veranderen is de 
eerste keuze de eenvoudigste. In figuur 2 
worden mogelijke indelingen gegeven. 

Karakterset 

De standaard Upper- en Lowercase karak¬ 
terset zijn geplaatst onder de adressen 
$1000-$1 FFF. Voor een alternatieve set is 
dus plaats in het gebied $0800-$0FFF. Het 
selecteren van een karakterset in dit ge¬ 
bied gebeurt met POKE 53272,19. BASIC 
begint dan op $1000. 

Hiresscherm 

De laagste plaats voor een hiresscherm is 
vanaf $2000. BASIC kun je nu laten begin¬ 
nen op $4000. 
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Sprites-set en ML-routines 

Gebruik je maar een paar sprites dan zijn 
de data hiervoor te plaatsen in de 
adressen aangegeven door Courbois in 
zijn artikel "SPRITES of MOBS” in COM- 
MODORE-INFO nr. 2,1986. Is deze ruimte 
niet voldoende dan kun je de spriteset 
kwijt tussen de alternatieve karakterset en 
het hiresscherm (als je die gebruikt). In dit 
blok kunnen ook de machinetaalroutines 
worden geplaatst die niet in de 4 kB van 
$C000-$CFFF passen. 

Programma-opbouw 

Nadat je een indeling hebt gemaakt van de 
beschikbare geheugenruimte moet je er¬ 
voor zorgen dat alle onderdelen op de 
juiste plaats in het geheugen worden gela¬ 
den. Stel, je wilt naast je BASIC-program- 
ma gebruik maken van een karakterset, 
een directorylezer in de cassettebuffer en 
een verzameling ML-routines. De hiervoor 
te verrichten handelingen worden hieron¬ 
der besproken. 

Verplaatsen begin Basic 

Allereerst moet aan de computer worden 
opgegeven dat BASIC niet meer op de 
normale plaats ($0801) moet beginnen, 
maar direct achter de karakterset ($1001). 
Het programma in listing 1 zorgt hiervoor. 
In regel 18 wordt het nieuwe startadres 
opgegeven: 256 maal de inhoud van adres 
44 plus de inhoud van adres 43 
(256*16+1 =4097=$1001). Het adres hier 
vlak voor (256*16=$1000) moet de inhoud 
’0’ krijgen. De regels 12 t/m 16 zorgen 
ervoor dat automatisch het volgende BA- 
SlC-programma wordt geladen en gestart. 
Regel 12 definieert enkele cursorbestu- 
ringstekens (’CLR/HOME’ en 'CURSOR 
DOWN’) en aanhalingsteken. Regel 14 
wist het scherm en print vervolgens 
LOAD”LADER 2”,8 

en een aantal regels lager 'RUN'. Deze 
regels maak je 'onzichtbaar' door ze in de 
achtergrondkleur te laten printen. Tussen 
regel 14 en 16 kun je eventueel een aan¬ 
kondiging van je programma laten printen. 
Regel 16 tenslotte vult de keyboardbuffer 
(adressen 631-640) met achtereenvolgens 
'HOME' (19) en tweemaal 'RETURN' (13). 
In adres 198 wordt opgegeven hoeveel 
waarden er in de keyboardbuffer zijn opge¬ 
slagen; het moet hier de inhoud 3 krijgen. 
Nadat het programma is uitgevoerd (’LO- 
AD’ en 'RUN' zijn geprint en het begin van 
BASIC is verplaatst naar $1001) wordt in 
de keyboardbuffer gekeken of er nog toet¬ 
sen zijn ingedrukt. De 4 POKEs uit regel 16 
simuleren dat dat inderdaad het geval is. 
Daardoor wordt de cursor naar HOME- 
positie verplaatst (631) en wordt een RE¬ 
TURN (632) geprint op de regel waar staat 
’LOAD”LAiDER 2”,8’. Lader 2 wordt nu 
geladen van diskette en ingelezen vanaf I 
adres $1001. De cursor staat dan op de I 


regel waar 'RUN' staat en de tweede RE¬ 
TURN (633) wordt geprint. Het programma 
'Lader 2’ wordt hiermee gestart. 

Laden van Niet-Basic 
onderdelen 

Lader 2 (zie listing 2) zorgt ervoor dat alle 
niet-BASIC onderdelen worden geladen. 
In dit voorbeeld zijn dat de directorylezer 
(in de cassettebuffer), de karakterset 
($0800-$09FF) en een verzameling ML- 
routines (vanaf $C000). BASIC heeft de 
eigenaardigheid dat na iedere LOAD-op- 
dracht in programma-mode het BASIC- 
programma opnieuw wordt geRUNd. Dat 
wil zeggen: er wordt niet doorgegaan met 
het statement direct na de LOAD-op- 
dracht, maar met het allereerste statement 
van het programma. Daarom zijn deze 
laadopdrachten in een aparte lader onder¬ 
gebracht. Dat is ook gedaan om te voorko¬ 
men dat deze onderdelen iedere keer wor¬ 
den geladen als het (hoofd)programma 
wordt geRUNd. De teller 'XX' en het 'ON 
XX GOTO’-statement in regel 12 zorgen 
ervoor dat bij iedere run van het program¬ 
ma naar een volgende regel wordt ge¬ 
sprongen. In de regels 14-18 worden de 
niet-BASIC delen geladen. Het aantal on¬ 
derdelen dat op deze manier kan worden 
geladen is zonder problemen uit te brei¬ 
den. Alleen moet dan ook het aantal doel- 
regels na het GOTO-statement van regel 
12 worden vergroot. Hierna hoeft alleen 
het BASIC programma (hoofdprogramma) 
nog te worden geladen. Dat gebeurt in de 
regels 20 t/m 24 op exact dezelfde manier 
als hierboven omschreven. 

Doorladen programma’s 

Het doorladen van programma’s zoals we 
in listing 1 en 2 hebben laten zien kan ook 
in het (hoofd)programma worden toege¬ 
past. Dit kan een oplossing zijn als het 
programma te groot dreigt te worden om, 
naast de variabelen en datablokken, in z’n 
geheel in het geheugen te passen. Het 
programma kan dan verdeeld worden in 
bijvoorbeeld een module voor het invoeren 
en wijzigen van gegevens en een module 
voor het raadplegen en printen van gege¬ 
vens. Een voorbeeld van het doorladen 
van programma’s wordt gegeven in listing 
3. De regels 92 en 94 uit de beide program¬ 
ma’s van deze listing komen weer overeen 
met regels uit listing 1 en 2. 

Deze methode van programma-opbouw 
kan vergeleken worden met 'procedures' 
uit programmeertalen als LOGO, PASCAL 
en FORTRAN. Je kunt hiermee veelge¬ 
bruikte subroutines als afzonderlijke pro¬ 
gramma's op diskette opslaan en waar 
nodig vanuit het hoofdprogramma de rou¬ 
tine inlezen. Nadat de routine doorlopen is j 
moet het hoofdprogramma weer worden 
geladen. 


Append 

Een andere manier om veelgebruikte routi¬ 
nes in je programma op te nemen is met 
behulp van een APPEND-programma. 
Ook nu worden de routines afzonderlijk op 
diskette opgeslagen, waarbij erop gelet 
moet worden dat alle routines UNIEKE 
regelnummers moeten hebben. Komt bij¬ 
voorbeeld regelnummer '100' in een van 
de routines voor, dan mag dit regelnum¬ 
mer niet in een van de andere routines of in 
het hoofdprogramma voorkomen. Een 
voorbeeld van een dergelijk APPEND-pro¬ 
gramma is gegeven in listing 4. De truc van 
dit programma bestaat hieruit, dat na het 
laden van een routine het begin van het 
BASIC-werkgeheugen wordt verplaatst tot 
achter het laatste adres van die routine. 
Vervolgens wordt een tweede program- 
ma-onderdeel geladen en wederom wordt 
het begin van BASIC verplaatst tot achter 
de routine. Wanneer alle routines zijn gela¬ 
den, krijgt het begin van BASIC weer de 
oorspronkelijke waarde en kan de verza¬ 
meling routines als een geheel worden 
weggeschreven. Zo kan zonder al te veel 
tikwerk in korte tijd het ’standaard’-ge- 
deelte van een programma in elkaar wor¬ 
den gezet. 

In de listing staat in regel 2 "programma¬ 
naam”. Dit moet vervangen worden door 
de naam van de routine die geladen moet 
worden om aan het in het geheugen aan¬ 
wezige deel te worden toegevoegd. De 
regels 3 t/m 6 zijn vergelijkbaar met de 
regels uit de laders van eerder besproken 
listings. Regels 7 en 8 zorgen voor het 
verplaatsen van het begin van het BASIC- 
werkgeheugen. Opgemerkt moet hierbij 
nog worden dat de eerste regel van het te 
laden programma hoger moet zijn dan de 
laatste regel van het in het geheugen aan¬ 
wezige programma(deel). 

Een voorbeeld van een routine die in veel 
programma’s gebruikt kan worden en die 
met behulp van een APPEND-programma 
in het (hoofd)programma kan worden op¬ 
genomen staat mijn artikel "INVOER” in 
Commodore-INFO nummer 8, jaargang 2 
(1985). Er zijn vele toepassingen te beden¬ 
ken voor het werken met standaard rou¬ 
tines. 

Laden en wegschrijven van 
Niet-Basic onderdelen 

Een probleem waar velen vroeg of laat 
over struikelen is het wegschrijven van 
niet-BASIC onderdelen. Dit kunnen machi¬ 
netaalroutines zijn, maar ook datablokken 
voor hiresscherm, karakterset of sprites- 
set. Hetzelfde geldt ook indien deze onder¬ 
delen moeten worden ingelezen vanaf een 
ander adres dan bij het wegschrijven is 
opgegeven. Een ML-monitor kan dit werk 
vrij eenvoudig doen, maar niet iedereen 
beschikt over een dergelijke monitor of 
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kan er voldoende mee overweg. Het pro¬ 
gramma ”LOAD & SAVE MEMORY”, afge- 
beeld in bijgaande listing, is een kort ma- 
chinetaalprogramma dat dit mogelijk 
maakt. 

Het programma werkt als volgt: 

- Allereerst wordt het ML-programma ge- 
POKEd in geheugengebied $C000-$C06F 
(regel 203, 260-281). 

- In regel 206 wordt opgegeven of een 
datablok moet worden geladen (Dl = 1) of 
weggeschreven (Dl=2). 

- In regel 209 komt de naam (NM$) van het 
te laden of weg te schrijven datablok te 
staan en wordt de lengte van deze naam 
berekend (L). 

- De variabele AL geeft het startadres van 
de laad-routine aan (regel 212) en AS het 
startadres van de schrijf-routine (regel 
215). 

- De variabelen SA en EA moeten door de 
gebruiker worden ingevuld met het start¬ 
adres (SA, regel 218) en het eindadres (EA, 
regel 221) van het weg te schrijven data¬ 
blok. Bij het laden van een datablok hoeft 
alleen het startadres te worden opgege¬ 
ven. Het eindadres kan dan een willekeuri¬ 
ge (legale) waarde krijgen. 

- In de regels 224 t/m 236 worden de 
opgegeven variabelen omgezet in voor de 
routine bruikbare informatie. 

- Het laden wordt gestart met de opdracht 
'SYS AL’ in regel 242. 




- Na nog wat berekeningen (regel 245-254) 
wordt de schrijf-routine gestart met de 
opdracht ’SYS AS’ in regel 257. 

Nog wat opmerkingen bij dit programma: 

- Het programma voert geen enkele con¬ 
trole uit; staat de drive uit of zit er geen disk 
in dan loopt het programma vast. Mis¬ 
schien wil een van de lezers die wat meer 
bedreven is in het programmeren in machi¬ 
netaal ons in een volgend nummer van 
Commodore-INFO verblijden met een ver¬ 
beterde versie. 

- Om de routine te verplaatsen moet A 
(regel 203) verhoogd worden in stappen 
van 256 en in de dataregels (263-281) de 
waarden 192 ($C0) verhoogd worden in 
stappen van 1. 

- Schrijf voor de eerste RUN het program¬ 


ma eerst weg. De in de listing ingevulde 
waarden voor Dl, NM$, SA en EA zorgen 
ervoor dat na het runnen het programma 
wordt weggeschreven als ML-DATABLOK 
(disk in de drive plaatsen!). Nadat dit is 
gebeurd kunnen in het (BASIC-) program¬ 
ma de regels 263 t/m 281 worden vervan¬ 
gen door: 

260 XX=XX+1:ON XX GOTO 263,266 
263 LOAD "LOAD&SAVE MEMORY”,8,1 
266 RETURN 

Het voordeel van deze handelwijze is dat 
bij het gebruik van het programma niet 
eerst de ML-data hoeven te worden gePO- 
KEd. Het zal duidelijk zijn datje op dezelf¬ 
de manier ook andere data-laders kunt 
veranderen. Dit scheelt aanmerkelijk veel 
(wacht)tijd. 


Abonnementen 

info 


Bij fouten inde adressering etc. kunt u 
dat meestal het gemakkelijkst oplos¬ 
sen door op de girokaart gewoon het 
adres te veranderen, dan komt het 
vanzelf door in onze administratie. 
Informatie over uw abonnement 
kunt u krijgen via nr. 020-273198, 
maar dan allleen op DINSDAG van 10 
tot 2 uur. Liefst niet op andere dagen, 
daar u dan onze redactie en 
commerciële afdeling daarmee be¬ 
last, die u meestal niet kunnen 
helpen. 


DIRECTORYLEZER 

De in dit artikel genoemde ’Directorylezer’ is een kort ML-programma dat in de 
cassette-buffer wordt geplaatst ($0375-$03E7). Een listing ervan wordt in listing 5 
gegeven. Tijdens het draaien van een programma kan de directory worden opge¬ 
vraagd en op het scherm worden gelist met de opdracht ’SYS 885’. Hierna wordt 
gewoon doorgegaan met het uitvoeren van het programma. Om te zorgen dat de 
directory op het scherm blijft staan totdat een toets wordt ingedrukt kunnen de 
volgende opdrachten worden gebruikt: PRINT CHR$(147): 

SYS 885: 

POKE 198,0: 

WAIT 198,1: 

___GET T$_ 



IVLldoCiHo 

Deze keer helaas een misser uit het 
vorige nummer. 

In Mastermind uit nr.6, ’86 op pag. 33 
moet in regel 1550 niet POKE+80, maar 
POKEK+80 staan. 

LISTING- SPREEKUUR 

Voor Missers en vragen over listings : 

Iedere Maandag van 17.00 - 
21.00 tel. 02152-65695. Na 1 
november : 02155-25162 
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Computeronder wij s 


I n Nederland dringt de computer nog 
maar aarzelend de leslokalen bin¬ 
nen. De ervaringen waren niet alle¬ 
maal even gunstig en hoewel burger- 
informatica terrein wint, zijn we er 
nog niet. Dit in tegenstelling tot de VS 
waar computeronderwijs uit en thuis 
een alledaags verschijnsel is. Het is 
daarom niet verwonderlijk dat vele soft¬ 
ware huizen van naam zich vol vuur op 
deze nog betrekkelijk jonge markt 
storten. 

Vele van deze kwalitatief goede pakketten 
zijn ongetwijfeld na aanpassing geschikt 
voor het Nederlandse onderwijs, sommige 
worden al vertaald en uitgebracht, maar 
ook wanneer dat niet het geval is, gunnen 
wij u vast een kijkje in de educatieve keu¬ 
ken. Een goed begrip van de mogelijkhe¬ 
den stimuleert het zelf experimenteren. 

Spelend leren 

Kinderen leren, zoals de eeuwenoude 
volkswijsheid zegt, in hun spel veel sneller 
dan in een opgedrongen schools bestel. 
Software-ontwikkelaars maken daar in 
hun videospelletjes handig gebruik van 
door situaties te bedenken, waar het kind 
alleen maar door actief bezig zijn uit kan 
komen. Een leuk voorbeeld van taalonder¬ 
richt is de ”Cave of the Word Wizard” (= De 
Grot van de Woordtovenaar). De spelfi- 
guur zit gevangen in een geheimzinnige 
grot waarin de woordtovenaar verschijnt. 

Om te kunnen ontsnappen moet de ”held” 
vier magische kristallen verzamelen. Dat 
gaat natuurlijk niet zomaar, want de oude 
tovenaar stelt voortdurend vragen waarop 
het kind het gevraagde woord korrekt 
moet spellen. Anders kom je niet verder. 
De echt sprekende tovenaar beschikt over 
500 woorden op 10 verschillende moeiiijk- 
heidsniveaus. Dit woordspel is leverbaar 
voor C-64/128. 


Topografie. 

Zeer aantrekkelijk zijn de geografische vi- 
deopuzzels, waarbij de speler personen of 
objecten over de gehele wereld dient op te 
sporen en gaandeweg kennis over die 
landen opdoet. Radarsoft maakte daar 
school mee in ons land en exporteert naar 
heel Europa en Amerika. Ook giet men 
deze materie wel in Trucker- spelletjes of 
business-games of grote wegraces door 
het hele land (de USA). Het blijft gaan om 
kennisoverdracht op een aantrekkelijke 
manier en het daarmee werken en zodoen¬ 
de oefenen. 

Het bekende softwarehouse Broderbund 
(oa. printshop) heeft daar weer een interes¬ 
sante variant op gemaakt met ”Waar in de 
wereld verblijft de superschurk CARMEN 
SANDIEGO?” 

Om het internationale mysterie op te los¬ 
sen dient men heel wat gegevens over vele 
landen na te trekken. Daartoe staat een 
kopie van een Wereld-Almanak ter be¬ 
schikking. Het spelen gebeurt via keuze 
menu’s en gekleurde animaties, omlijst 
met fraaie geluidseffecten. Ten einde ver¬ 
veling te voorkomen beschikt het spel over 
10 verschillende schurkenrollen en 30 op- 
drachtlanden. 

Wellicht ook aardig voor aardrijkskundig 
onderwijs in Nederland zijn de program¬ 
ma’s "EUROPEAN NATIONS & LOCATI- 
ONS” en "STATES & TRATES” van De- 
signware. De eerste is vanaf 8 jaar, de 
tweede zelfs vanaf 3 jaar speelbaar. 


Koesterde u allang de wens 
virtuoos te worden? Dan biedt THE NOTA- 
BLE PHANTOM als pianoleraar op de C- 
64 wellicht uitkomst. Dit DesignWare-pro- 
gramma leert de basisvaardigheden ; toet¬ 
senbord en noten lezen in een spelsituatie 
met geesten, spinnen en een mu- 
ziekliefhebbend fantoom. Verder is het 
mogelijk om eenvoudige wijsjes en liedjes 
te componeren en te saven. THE NQTA- 
BLE PHANTOM komt kompleet met song- 
book en is bedoeld om kinderen het lezen 
en spelen van noten te leren. 


Exacte vakken. 

Visualisaties kunnen vakken als biologie 
en wiskunde educatief verlevendigen. Met 
THE TRANSPARANT BODY leert de jonge 
biologie student(e) via het doorzichtig 
menselijk lichaam de plaats en functie van 
organen, vaten, botten en spieren. Leeftijd 
vanaf 10 jaar. Het pakket "MISSION ALGE¬ 
BRA”, eveneens van Designware, geeft 
een cursus basis-algebra m.b.v. interga¬ 
lactische berekeningen en functies, om de 
buitenaardse wezentjes de baas te blijven. 
Als laatste de huiscomputer/PC als meet 
en regelinstrument. Met de SCIENCE 
TOOLKIT (TM) van Broderbund Software 
verandert uw computer in een thermome¬ 
ter, lichtmeter, een timer en een strip chart, 
alle zichtbaar op het monitorscherm. De kit 
bestaat uit een interface, een licht en een 
thermosensor, en een 128 pagina’s dikke 
handleiding voor het zelf verrichten van 
experimenten. m 
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Jan Bodzinga zet zijn serie Basis Basic voort met het vervolg van het woordspel 
"Woorden raden”, waarin hij stap voor stap het gebruik van strings en teksten aan de 
orde laat komen. 

Aan het einde van deze aflevering wordt nog eens de hele listing geplaatst, zoals die in 
dit en in het vorige nummer van Commodore Info is behandeld. 


Basis Basic 


Deel 8 

Strings en teksten - 2 


De vorige keer waren we gebleven bij de arrays waarbij we woorden in 
willekeurige volgorde konden inlezen bij het zelf te maken spel "Woorden 
raden”. We pakken de draad weer op met het vervolg van het programma en 
kijken eerst naar de mogelijkheden om instructies op het scherm te zetten, 
die het programma voor de speler uitleggen. 


Instructie 

De volgende stap in het programma heeft 
te maken met een scherm vol tekst, waarin 
we de instructies voor het programma 
kunnen zetten. We hebben hier een sub- 
routine van gemaakt, waarbij de verschil¬ 
lende teksten als strings na een PRINT- 
opdracht zijn geplaatst. 

4000 REM instructies woorden raden 
4010 CLS 

4020 PRINT "WOORDEN RADEN” 

4030 PRINT 

4040 PRINT ”Met dit spel kunnen 'gehei¬ 
me’ woorden” 

4050 PRINT "worden ontrafeld door let¬ 
ter voor letter” 

4060 PRINT ”te testen of ze in het woord 
voorkomen.” 

4070 PRINT 

4080 PRINT "Het woordenbestand be¬ 
staat uit”;TL;” woorden.” 

4090 FOR I = 0 TO 2000:NEXT 
4100 RETURN 

Let hierbij nog even op de enkele aanha¬ 
lingstekens in regel 4040. We kunnen hier 
uiteraard geen ”” gebruiken. Dan zal de 
Commodore denken dat de string is afge¬ 
lopen en een ’SYNTAX ERROR’ zal het 
gevolg zijn. In regel 4090 vinden we een 
FOR..TO..NEXT lus, die nergens anders 
voor dien* dan een vertraging. We hebben 
hierdoor 2000 lussen’ de tijd orn de tekst 
op het scherm te kunnen lezen. 


Het kiezen van een woord 

Een volgend gedeelte van de omschrijving 
van de taken van ons spelprogramma be¬ 
treft het kiezen van een woord. Nadat alle 
woorden zijn ingelezen moet de Commo¬ 
dore overgaan tot het kiezen van een wille¬ 
keurig woord uit de complete lijst. De 
volgorde van de woorden moet iedere keer 
anders zijn, zodat ook de maker van het 
programma geen houvast meer heeft aan 
zijn kennis van alle DATA regels die in het 
programma zijn opgenomen. In het pro¬ 
gramma hebben we daarvoor een routine 
gemaakt, die tegelijk test, of het woord niet 
reeds eerder aan de beurt is geweest. Met 
hulp van de RND( )-functie wordt een wille¬ 
keurig woord gekozen uit de complete lijst. 

1200 REM genereren woord 
1210 I = INT(RND(0)*TL+1) 

1230 IF W$(l) = THEN 1210 
1240 W$=W$(I) 

1250 W$(I) = ’V’ 

1260AW = AW+1: REM aantal gebruikte 
woorden 

1270 AB=0:FB=0:GB$=””: REM nul- 
zetten 

1290 RETURN 

Deze subroutine is de kern van het hele 
programma. Hier wordt een codewoord uit 
de hele serie aanwezige woorden in de 
array W$(x) gekozen. De index van het te 
kiezen woord wordt 'willekeurig' bepaald 
door de waarde met hulp van een RND( )- 



functie in regel 1210 toe te kennen aan de 
dummy variabele I. De variabele TL zorgt 
er in deze regel voor, dat I altijd een waarde 
krijgt tussen 1 en TL, ofwel het maximum 
aantal beschikbare woorden. In 1230 
wordt eerst getest of het woord uit W$(l) de 
waarde heeft. Is dit zo, dan betekent 
het, dat dit bepaalde woord inmiddels is 
gebruikt, en moet er dus een nieuw woord 
worden gezocht. Er wordt in dat geval via 
regel 1210 opnieuw een random getal aan I 
toegewezen, net zolang tot de index I wijst 
naar een woord in de array W$() die geen 
als waarde heeft. 

Als we een nog niet gebruikt woord gevon¬ 
den hebben, wordt dit toegewezen aan de 
stringvariabele W$, die we hebben aange¬ 
wezen als codewoord. Met W$ zullen we 
straks gaan raden. De index I in de array 
W$() krijgt nu de waarde ”*” waarmee we 
aangeven dat het woord uit deze index is 
gebruikt, (regels 1240/1250) 

Het aantal gebruikte woorden wordt bijge¬ 
houden in de teller AW. Deze wordt daar¬ 
om nu met 1 verhoogd (1260). Omdat we 
hier bezig zijn met een hele nieuwe ronde 
in ons raadspel is het noodzakelijk de 
nodige variabelen op nul te zetten. Daar¬ 
mee voorkomen we, dat er nog eventuele 
waarden uit vorige beurten blijven hangen. 
Dit geschiedt in regel 1270. Het aantal 
beurten (AB) en de foute beurten (FB) 
worden 0, terwijl de string die het aantal 
gebruikte letters bijhoudt (GB$) ook wordt 
leeggemaakt. Het einde van de subroutine 
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is uiteraard een RETURN. Als functie van 
deze routine hebben we een codewoord in 
W$, terwijl de nodige variabelen op nul zijn 
gezet. Een gedeelte van onze analytische 
programma-omschrijving is hiermee om¬ 
gezet in Basic- regels. 

De zoekstring 

De volgende regel uit onze programma- 
opzet betreft de string die op het scherm 
moet worden gezet, op grond waarvan de 
speler het codewoord moet raden. Deze 
string is aan het begin helemaal leeg. Om 
de lengte van het te raden woord aan te 
geven hebben we deze zoekstring gevuld 
met een serie min-tekens, waardoor de 
speler de lengte van het woord kan zien. 
De juist geraden letters worden gaande 
het spel op de korrekte plaats in het woord 
gezet. Zo wordt het geheel visueel aan¬ 
trekkelijk en het geeft ons de gelegenheid 
nog een paar stringfuncties onder de lou- 
pe te nemen. 

Laten we beginnen met het volgende on¬ 
derdeel van de omschrijving, het maken 
van de bewuste zoekstring. In Basic zou 
dat er zo uit kunnen zien: 

1000 REM zoekstring maken 
1010 LL = LEN(W$) 

1020Z$ = LEFT$(”. 

”>LL) 

1030 RETURN 

Een betrekkelijk eenvoudige routine, waar¬ 
in twee stringfuncties worden gebruikt. De 
eerste is de LEN( )-functie, die we inmid¬ 
dels kennen. De volgende vinden we in 
regel 

1020: Z$=LEFT$(”.”,LL). 

LEFT$(str ing, getal) 

Dit is een functie om met strings te kunnen 
manipuleren. De syntax van deze functie is 

X$=LEFT$(string,numerieke expressie). 
Het aantal karakters, dat wordt voorge¬ 
steld door het getal van de numerieke 
expressie wordt van de string vanaf de 
linkerkant genomen en toegewezen aan 
de variabele X$. Als de originele string 
korter is dan het aantal opgegeven plaat¬ 
sen, wordt de hele string genomen. Zo 
wordt de waarde van X$ bij de opdracht 

X$=LEFT$(”ABCDEFGH”,2) 

de eerste twee posities van "ABCDEFGH” 
dus ’’AB”. 

Een simpele maar doeltreffende manier 
om een gedeelte van een string toe te 
wijzen aan een andere stringvariabele. Het 
enige waar je aan moet denken bij het I 
gebruik van deze functies is het feit, dat de 
waarde van de numerieke expressie of 
constante moet liggen tussen 0 en 255. Als 
er een 0 als getal in de functie wordt gezet, 
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krijgt de nieuwe string een nulstring, ofwel 
de waarde 

In het programma maken we gebruik van 
een stringconstante, die bestaat uit een 
hele serie min-tekens. De lengte van het 
codewoord (LL) wordt van deze min-string 
afgesneden en toegekend aan de variabe¬ 
le voor onze zoekstring, Z$. 

Printen op het scherm 

Het printen van de diverse gegevens op 
het scherm heeft weinig woorden nodig. Er 
is een subroutine van gemaakt, die na 
invoer van iedere letter wordt aangeroe¬ 
pen. Alle gegevens die nodig zijn om het 
spel te spelen, worden bijgewerkt en op 
het scherm afgedrukt. 


1500 REM schermprint 


1510 CLS 


1520 PRINT’WOORDEN RADEN”:PRINT 

1530 PRINT’Totaal aantal 

woorden : 

”;TL, 


1540 PRINT’Totaal letters 

: ”;LW 

1550 PRINT 


1560 PRINT’Totaal beurten 

: ”;AB 

1570 PRINT’Foute beurten 

: ”;FB 

1580 PRINT’Aantal kansen 

: ”;TB- 

FB 


1590 PRINT”Gebruikte letters 

: ”;GB$ 

1600 PRINT’W O O R D 

;Z$ 

1610 RETURN 



Een eenvoudig stukje listing, waarbij nage¬ 
noeg uitsluitend stringconstanten zijn ge¬ 
bruikt, die samen met de inhoud van diver¬ 
se variabelen op het scherm worden ge¬ 
zet. In regel 1600 wordt het zoekwoord 
(Z$) geprint, dat bij het begin van het spel 
bestaat uit een reeks min-tekens. 

Invoeren van een letter 

Nu begint de feitelijke interactie met de 
speler. Er moet een letter worden inge¬ 
toetst, waarvan de speler vermoedt dat hij 
voorkomt in het woord. Het ingetypte te¬ 
ken zal door de Commodore eerst op zijn 
geldigheid moeten worden getest. Het is 
natuurlijk niet de bedoeling, dat er cijfers 
en symbolen worden ingetypt, want die 
komen in de woorden uit de DATA-BANK 
niet voor. De eventuele foute karakters 
moeten er dus uit worden gefilterd, voor¬ 
dat we met het programma verder gaan: 

1299 REM haal letter 

1300 INPUT "Welke letter :”;L$ 

1310 L$ = LEFT$(L$,1) 

1320 IF L$ <”a” OR L$ >”z” THEN PRINT 
"fout”: GOTO 1310 
1330 GB$ = GB$ + L$ + 

1340 RETURN 

Het intoetsen van de letter gebeurt met I 
een INPUT-opdracht. Omdat het daarbij 
goed mogelijk is, dat de speler meer dan I 


één letter intypt, wordt er via LEFT$(L$,1) 
de eerste letter afgehaald en opnieuw toe¬ 
gekend aan dezelfde variabele L$. 
Vervolgens wordt L$ getest op een minder 
voor de hand liggende manier. De letter in 
L$ moet er één zijn, die voorkomt in het 
alfabet, dus in feite ligt tussen ’a’ en ’z’. De 
test daarop voeren we uit op de manier, die 
we ook gebruiken voor numerieke variabe¬ 
len. We gebruiken simpelweg de tekens 
voor groter en kleiner dan, met als enige 
verschil, dat de operatoren nu als strings 
tussen aanhalingstekens komen te staan. 
Het slot van deze routine zorgt ervoor dat 
de string GB$, die de gebruikte letters 
bijhoudt en op het scherm print wordt 
aangevuld met de zojuist ingetypte letter 
L$. Hier komen we het plusteken weer 
tegen in verband met de strings. 

Aan de diverse bewerkingen in deze routi¬ 
ne zien we, dat er wel degelijk berekenin¬ 
gen met tekststrings zijn te maken, zij het 
dan tot op zekere hoogte. 



Juiste letter 

De volgende subroutine in het programma 
bekijkt of de letter uit L$ voorkomt in het 
originele codewoord W$. Is dit het geval, 
dan wordt ook in het zoekwoord Z$ op 
dezelfde plaats het minteken vervangen 
door de letter in L$. Daarnaast moet ook 
het aantal beurten en eventuele foute 
beurten worden bijgehouden: 

1100 REM vergelijken 

1105 REM W$ = codewoord 

1110 REM L$ = letter 

1120 VL = 0 : REM vlag 

1130 FOR I = 1 TO LL 

1140IFMID$(W$,I,1)< >L$ THEN 1170 

1150 VL = VL + 1 

1160 Z$ = LEFT$(Z$,M) + L$ + 
MID$(Z$,I + 1) 










1170 NEXT 

1180 AB = AB + 1: REM aantal beurten 
1190 IF VL= 0 THEN FB = FB + 1 
1199 RETURN 

Een betrekkelijk ingewikkelde subroutine. 
Er wordt gewerkt met een ’vlag’ (VL) die 
wordt gebruikt om aan te geven of de letter 
(L$) in het woord voorkomt (VL=VL+1) of 
niet (VL=0). Aan de hand van deze vlag 
wordt in het verdere verloop van het pro¬ 
gramma bepaald wat er gebeuren moet. 
De test of de letter L$ voorkomt in het 
woord W$ is echter veel interessanter. 
Bekijk de regels 1130 tot 1170 maar eens 
goed. Hier vind je een FOR..TO..NEXT lus, 
die loopt van het begin van het woord W$ 
tot het laatste karakter. LL heeft immers 
als waarde de lengte van W$. Nu krijgen 
we te maken met een andere manipula- 
tiefunctie voor strings MID$( ). Deze func¬ 
tie onderscheidt zich maar weinig van de al 
eerder genoemde LEFT$(), maar er zit een 
nuanceverschil tussen. 

MID$(string-,begin, aantal) 

Deze functie komt terug met een midden¬ 
gedeelte van een bepaalde string. De syn- 
tax van deze functie is: 
X$=MID$(string,num.var,num.var). 

Het aantal tekens vanaf het begin van de 
string vinden we in de eerste numerieke 
variabele, het aantal dat we uit de string 
moeten nemen en toe moeten kennen aan 
X$ wordt bepaald door de tweede variabe¬ 
le. Bij de opdracht X$ = 
MID$(”1234567”,3,4) krijgt X$ dus als 
string : ”3456”. We kunnen bij deze functie 
de laatste numerieke variabele weglaten, 
waardoor vanaf de aangegeven plek in de 
string de hele string tot het eind toe wordt 
genomen. X$ = MID$(”1234567”,3 ) geeft 
dus aan XI de waarde ”34567” ! 

Deze laatste variant hebben we toegepast 
in regel 1160 waar de letter L$, als hij in het 
woord voorkomt in de zoekstring Z$ wordt 
geplakt. De test op het al of niet voorko¬ 
men van L$ in W$ verloopt, door telkens 
met de FOR..TO..NEXT lus en MID$0 één 
plaats op te schuiven in W$. Zodra een 
letter wordt gevonden verrichten we in 
1160 enig plakwerk met Z$, waarbij VL 
wordt verhoogd, zodat het aantal keren 
dat de letter in het woord zit netjes wordt 
bijgehouden. 

Deze subroutine is de meest gecompli¬ 
ceerde van het hele programma en ver¬ 
dient dan ook ruime aandacht. 

De test 

We zijn bijna klaar met de subroutines die 
nodig zijn om het spel WOORD RADEN te 
spelen. Het enige wat er nog moet gebeu¬ 
ren is een routine die bekijkt of de gegeven 
letter inderdaad in het woord zit Is dit zo, 
dan moet de speler de gelegenheid krijgen 


om het hele woord te kunnen intoetsen. 
Als de letter fout was, dan wordt de volgen¬ 
de letter gevraagd. De vlag uit de vorige 
subroutine (VL) is ons hier behulpzaam. 

2000 REM test oplossing 
2005 IF VL=0 AND FB .004TB THEN 3100 
2010 IF VL=0 THEN RETURN 
2020 PRINT ”De letter ”;L$;” komt”;VL;” 
keer voor.” 

2030 PRINT Z$;:INPUT” OPLOSSING : 

”;OP$ 

2040 IF OP$=W$ THEN GOTO 3000 
2050 RETURN 

In regel 2005 wordt getest of een foute 
letter is ingetypt (VL=0) en daarbij ook het 
maximum aantal beurten (TB) is over¬ 
schreden. Als dit het geval is, dan wordt de 
juiste oplossing op het scherm gezet en 
gevraagd of er nog een woord geraden 
moet worden. Regel 2010 gaat terug uit 
deze subroutine als de vlag nul is, er hoeft 
dan verder niets te worden verwerkt. In het 
vervolg van deze routine wordt het com¬ 
plete woord gevraagd. Dit woord (OP$) 
wordt vergeleken met W$, het codewoord. 
Zijn ze identiek, dan volgt op het scherm 
het aantal beurten waarin het woord is 
geraden, met daarbij de vraag of er nog 
een woord moet worden opgezocht. Let 
erop dat zowel in regel 2005 als in regel 
2040 met een GOTO uit deze subroutine 
wordt gesprongen. De RETURN-opdracht 
komen we in een volgende routine tegen: 

3000 REM goede oplossing 
3010 CLS 

3020 PRINT "Goede oplossing.” 

3030 PRINT’Geraden in”;AB;” beurten.” 
3040 GOTO 3130 
3100 REM oplossing fout/goed 
3110 CLS 

3120 PRINT "Maximum beurten bereikt.” 
3130 PRINT ”De juiste oplossing : ”;W$ 
3140 Z$=W$ 

3150 RETURN 

Het gedeelte waar de juiste oplossing en 
het maximum aantal fouten wordt ver¬ 
werkt en op het scherm gezet vinden we in 
de regels 3000 tot 3150. Hierin zitten feite¬ 
lijk twee routines door elkaar geweven. 
Enerzijds die voor een goede oplossing, 
aan de andere kant de foute. Voor de 
RETURN vinden we de opdracht Z$=W$, 
die in feite als een vlag voor het hoofdpro¬ 
gramma fungeert. Daaraan kan de Com¬ 
modore zien, dat - op welke manier dan 
ook - het woord inmiddels is afgewerkt, en 
er zal daarom een nieuw woord moeten 
worden opgezocht. 

Het hoofdprogramma. 

De laatste fase van ons programma is het j 
hoofdgedeelte. Hier hoeven we eigenlijk I 


Werkmarkt 

Gezocht: Enthousiaste software¬ 
verkopers cq. adviseurs op free¬ 
lance basis. Enige kennis van de 
C-64 en zo mogelijk ook van 
IBM-PC wordt verwacht. Het 
betreft een zeer setstand ige 
funktie waarbij toch in 
teamverband gewerdt wordt. 
Beloning op provisie- basis. Inl.: 
Infoconsult Software-service 
1985, tel. 08337-632 of 085- 
516967. 



Programmeur gevraagd 

voor het maken van 
oefenmateriaal in de vorm van 
eenvoudige komputerspelen. Te 
gebruiken bij de revalidatie van 
patiënten met hersenletsel. Moet 
helaas wel hobby blijven. 
Inlichtingen: Drs.L.A.J.de Vos, 
afd.Revalidatie, Acad.Ziekenhuis 
Rotterdam "Dijkzigt”. Tel.:010- 
633445 of 010- 633905 (reseptie). 
Thuis 010-220381 (na 18.30 uur). 


niet veel meer te doen dan alle subroutines 
in de juiste volgorde aan elkaar te koppe¬ 
len en een paar simpele tests uit te voeren. 

480 REM HOOFDPROGRAMMA 
490 GOSUB 4000 : REM instructies 
500 GOSUB 1200 : REM vind woord 
510 GOSUB 1000 : REM maak zoe¬ 
kwoord 

515 GOSUB 1500 : REM print scherm 
520 GOSUB 1300 : REM haal letter 
530 GOSUB 1100 : REM letter in woord 
535 GOSUB 2000 : REM testen 
540 IF W$ < > Z$ THEN 515 : REM test 
550 INPUT ”Nog een woord j/n”;JN$ 
555 IF LEFT$(JN$,1) = ”n”THEN END 
560 IF AW < TL THEN 500 
570 PRINT "Sorry, alle woorden gehad.” 
580 END 

Dit is het laatste gedeelte van de listing. 
Zoals je ziet bestaat het voor het grootste 
deel uit GOSUBs met hier en daar een 
eenvoudige test, waarvoor het in feite niet 
nodig is een subroutine te schrijven. De 
diverse tests hebben alle te maken met 
feiten die een directe relatie hebben met 
het hoofdprogramma. 

Als alles is ingetypt heb je de basis van een 
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aardig spel waar je zeker plezier aan kunt 
beleven en, wat meer is, waar je nog naar 
hartelust verbeteringen in kunt aanbren¬ 
gen, zodat het uiteindelijk een heel eigen 
gezicht krijgt. Wat te denken bijvoorbeeld 
van een test in de string GB$, om te zien of 
de ingetypte letter niet al eerder is ge¬ 
vraagd. Zo zijn er nog wel een paar moge¬ 
lijkheden, want omwille van de duidelijk¬ 
heid is dit programma nogal ruim opgezet. 
Ook het scherm kan nog best een betere 
lay-out krijgen. Ik wens je veel plezier bij 
het werken met dit programma. Voor de 
volledigheid drukken we de complete lis- 
ting van het spel nog een keer af. 

J.B. 

Woorden Raden 



10 REM WOORDEN RADEN 

20 REM Commodore-INFO 860815 / JB 

25 AB= 0 :REM aantal beurten 

30 LL= 0 :REM lengte woord 

35 FB= 0 :REM foute beurten 

40 TB=10 :REM max. foute beurten 

45 VL= 0 :REM vlag aan/uit 

50 TL= 0 :REM aantal woorden 

55 I = 0 :REM algemene var. 

60 LW= 0 :REM totaal letters 


65 REM STRING INITIALISATIE 
70 W$ = ”” : REM codewoord 
75 Z$ = ”” : REM zoekwoord 
80 LS = ”” : REM letter 
85 A$ = ”” : REM dummy 
87 OP$ = REM oplossing 

90 JN$ = REM JA/NEE string 

95 GB$ = REM Gebruikte letters 
100 REM BEGIN PROGRAMMA 
110 REM initialisatie & telling 
120 READ A$ 

130IF VAL(A$) = -1 THEN 200: REM alles 
gelezen 

140 TL = TL +1 : REM aantal woorden 
150 LW = LW + LEN (A$) : REM totaal 
lengte 

160 GOTO 120 

200 REM Inlezen woorden 

210 DIM W$(TL) : REM woordarray 

220 I = RND(-TI): REM willekeur 

230 RESTORE : REM data reset 

300 FOR I = 1 TO TL 

310 READ W$(l) : REM lees woord 

320 NEXT I 

480 REM HOOFDPROGRAMMA 
490 GOSUB 4000 : REM instructies 
500 GOSUB 1200 : REM vind woord 
510 GOSUB 1000 : REM maak zoe¬ 
kwoord 

515 GOSUB 1500 : REM print scherm 
520 GOSUB 1300 : REM haal letter 
530 GOSUB 1100 : REM letter in woord 
535 GOSUB 2000 : REM testen 
540 IF W$ < > Z$ THEN 515 : REM test 
550 INPUT ”Nog een woord j/n”;JN$ 

555 IF LEFT$(JN$,1) = ”n”THEN END 
560 IF AW > TL THEN 500 
570 PRINT "Sorry, alle woorden gehad.” 
580 END 

1000 REM zoekstring maken 
1010 LL = LEN(W$) 

1020 Z$ = LEFT$(”. 

”,LL) 

1030 RETURN 

1100 REM vergelijken 

1105 REM W$ = codewoord 

1110 REM L$ = letter 

1120 VL = 0 : REM vlag 

1130 FOR I = 1 TO LL 

1140 IF MID$(W$,I,1) < > L$ THEN 1170 

1150 VL = VL + 1 

1160 Z$ = LEFT$(Z$,I-1) + L$ + 
MID$(Z$,I + 1) 

1170 NEXT 

1180 AB = AB + 1: REM aantal beurten 
1190 IF VL= 0 THEN FB = FB+1 

1199 RETURN 

1200 REM genereren woord 
1210 I = INT(RND(0)*TL+1) 

1230 IF W$(l) = THEN 1210 
1240 W$=W$(I) 

1250 W$(l)=”*” 

1260 AW = AW+1: REM aantal gebruikte 
woorden 

1270 AB=0:FB=0:GB$=””: REM nul- 
zetten 


1290 RETURN 

1299 REM haal letter 

1300 INPUT "Welke letter :”;L$ 

1310 L$ = LEFT$(L$,1) 

1320 IF L$ < ”a” OR L$ > ”z” THEN 
PRINT "fout”: GOTO 1310 
1330 GBS = GB$ + L$ + 

1340 RETURN 
1500 REM schermprint 
1510 CLS 

1520 PRINT’WOORDEN RADEN”:PRINT 

1530 PRINT’Totaal aantal woorden : 

"TL 
> 1 


1540 PRINT’Totaal letters :”;LW 

1550 PRINT 

1560 PRINT’Totaal beurten :”;AB 

1570 PRINT’Foute beurten :”;FB 

1580 PRINT”Aantal kansen : ”;TB-FB 

1590 PRINT’Gebruikte letters : ”;GB$ 

1600 PRINT”W OORD :”;Z$ 

1610 RETURN 
2000 REM test oplossing 


2005 IF VL=0 AND FB >=TB THEN 3100 
2010 IF VL=0 THEN RETURN 
2020 PRINT "De letter ”;L$;” komt”;VL;” 
keer voor.” 

2030 PRINT Z$;:INPUT” OPLOSSING : 
”‘OP$ 

2040 IF OP$=W$ THEN GOTO 3000 
2050 RETURN 
3000 REM goede oplossing 
3010 CLS 

3020 PRINT "Goede oplossing.” 

3030 PRINT’Geraden in”;AB;” beurten.” 
3040 GOTO 3130 
3100 REM oplossing fout/goed 
3110 CLS 

3120 PRINT "Maximum beurten bereikt.” 
3130 PRINT ”De juiste oplossing : ”;W$ 
3140 Z$=W$ 

3150 RETURN 

4000 REM instructies woorden raden 
4010 CLS 

4020 PRINT "WOORDEN RADEN” 

4030 PRINT 

4040 PRINT ”Met dit spel kunnen 'gehei¬ 
me’ woorden” 

4050 PRINT "worden ontrafeld door let¬ 
ter voor letter” 

4060 PRINT ”te testen of ze in het woord 
voorkomen.” 

4070 PRINT 

4080 PRINT ”Het woordenbestand be¬ 
staat uit”;TL;” woorden.” 

4090 FOR I = 0 TO 2000:NEXT 
4100 RETURN 

4990 REM WOORDEN DATA-BANK 
5000 DATA computer,generator,taxi,mi¬ 
nimum,caravan 

5010 DATA vouwwagen,landschap,ach¬ 
terlicht,meisje 

5020 DATA woord,radio,automatiseren- 
,computerblad,krachtveld 
5030 DATA -1 


38 



TQI'Wl’l *»** 4" ** aflL Met o.a. Schudden - Mousetrap C-16 - Happelaar 

^ |,- y £| S/ow Print en Cursor Routine 


Zoals u heeft kunnen lezen, hebben wij ook dit jaar een 
programmeerwedstrijd uitgeschreven. We ontvingen al een 
groot aantal inzendingen, waar heel veel leuke programma’s bij 
zitten. Wanneer we het aantal inzendigen met dat van vorig jaar 
vergelijken, dan ontvingen we er tot nog toe bijna net zoveel. 
Maar in het afgelopen jaar zijn er echter duizenden Commodore 
computers verkocht. Dat zou betekenen dat wij dus ook véél 
meer inzendingen dan vorig jaar moeten ontvangen! We kunnen 
dus niet anders concluderen dan, dat er lezers zijn die hun eigen 
gemaakte programma’s achter houden. 

De redactie heeft na rijp beraad besloten om tot actie over te 
gaan. We gooien direct ons sterkste wapen in de strijd, om alle 
onwillige programmeurs alsnog over te halen hun eigen 
gemaakte programma’s in te sturen, we praten hier over omko¬ 
ping. Nu ja, wanneer uw programma geplaatst of bekroond gaat 
worden dan, de kwaliteit blijft van belang. 

Heeft u al een kleurenmonitor? Een printer nodig? Diskdrive 
misschien aan vervanging toe? Last van software-armoede? Dit 
alles kunt u oplossen door met uw inzending een prijs winnen. 
Mochten uw ogen zijn gaan glimmen van hebzucht, stuur ons 
dan nog vandaag een cassette met uw programma en wie 
weet... 


Syntax Checksum 


Het overtikken van een listing kan een heel karwei zijn en als u 
| een beetje normaal mens bent dan maakt u daarin beslist een 
aantal fouten. Nu is niets moeilijker om de fouten uit je eigen 
werk te halen. Al geruime tijd geleden heeft Jan Bodzinga 
hiervoor een zgn. Checksum-programma geschreven. Om de 
vele nieuwe lezers van Commodore-lnfo te helpen volgt hieron¬ 
der nog een keer een volledige uitlegh over de werking van dit 
programma, waarmee het, hoe vreemd dat misschien ook lijkt, 
echt mogelijk is om met behulp van dit programma de fouten in 
elke door ons geplaatste listing op te sporen. 

Hiervoor gaat u.als volgt te werk: 

O LI tikt de listing heel zorgvuldig over en SAVEt hem voordat u 
het programma RUNt op een diskette of een cassette. 


Inhoud van dit listingdeel Happe | aar 

52 

Checksum 

40 

Diamantenjacht 

55 

Screentrans 

41 

Slow Print 

58 

Schudden 

41 

Pauze-List 

58 

Ruimteslang C-16 

42 

Rom bug weg 

60 

Mousetrap C-16 

43 

Wegwezen 

60 

Codewoord C-16 

45 

Cursor routine 

61 

Schietschijf 

47 

Borderscroll 

62 


©U tikt het RUN commando in. Mocht het programma de 
boodschap 'Fout in dataregels!’ geven dan heeft u een fout 
bij het overtikken gemaakt. Herstel de fout en SAVE de 
verbeterde versie. Mocht het programma met de boodschap 
'data is weggezet checksum testten met sys ....’ komen dan 
is tot dusver alles goed. Het programma is nu in een stukje 
machinetaalgeheugen gezet. Als u het NEW commando 
geeft blijft het toch in de computer staan. 

Alle door ons geplaatste programma’s zijn in Basic geschreven. 
Als u een programma heeft overgetikt SAVE het eerst, mocht er 
iets mis gaan dan hoeft niet de gehele listing opnieuw te gaan 
intikken. Als u nu een programma op fouten wilt gaan controle¬ 
ren dan kunt u dat in het geheugen laden (wel eerst het 
checksumprogramma hebben gerund). Vervolgens typt u zon¬ 
der het programma te runnen de opdracht sys 49152 (C-64) of 
sys 1536 (C-16 en Plus/4) in. 

Als alles goed is gegaan loopt er nu een rij regelnummers over 
het scherm met getallen erachter. Dezelfde lijst staat ook achter 
elk door ons geplaatste programma. Wijkt nu een nummer 
achter een regelnummer af van het nummer dat in het blad staat 
dan heeft u in die regel iets anders ingetikt dan er in het blad 
stond. U kunt de stroom getallen d.m.v. de RUN/STOP toets 
pauzeren en weer vervolgen met de F1 of F7 toets. Het is 
uitermate belangrijk dat u goed met dit programma overweg 
kunt en mocht U het niet goed werkend krijgen bel dan gerust 
even met onze listingservice telefoonlijn. 


1 

rem ******************************* 

140 

data 

240,12,201,32,240,247,24,101,1 

regel 

6 

152 


** 


67,133 

regel 

7 

249 

2 

rem basic loader "SYNTAX.CHECKSUM" 

150 

data 

167,76,37,192,166,167,169,0,13 

regel 

10 

157 

3 

rem na de commando's ’run’ en ’new’ 


2,168 


regel 

20 

64 

4 

rem blijft dit programma in het ge- 

160 

data 

32,205,189,169,13,32,210,255,1 

regel 

30 

38 

5 

rem heugen, laad het te testen pro- 


64, 168 

regel 

40 

57 

6 

rem gramma en tik daarna sys 49152. 

170 

data 

76,17, 192,200,208,2,230, 164, 17 

regel 

50 

14 

7 

rem ******************************* 


7,163 


regel 

55 

251 


** 

180 

data 

96,162,0,189,123, 192,240,6,32, 

regel 

60 

192 

10 

i=49152 :rem beginadres 


210 


regel 

70 

42 

20 

reada:ifa<0then40srem data ingeleze 

190 

data 

255,232,208,245,32,73, 192, 170, 

regel 

80 

244 


n 


32,73 


regel 

90 

245 

30 

pokei,a:i®i+l:b=b+asgoto20 

200 

data 

192,132,168,32,205,189,162,3,1 

regel 

95 

237 

40 

if b< >16844thenprint"CCLR-H0ME1fout 


69,32 

regel 

100 

183 


in dataregels!":b=0:end 

210 

data 

32,210,255,202,208,250, 169,0,1 

regel 

110 

158 

50 

poke49184 , 148:poke49185, 192 


33,167 

regel 

120 

232 

55 

i =49300 

220 

data 

164,168,96,82,69,71,69,76,32,0 

regel 

130 

183 

60 

read a: ifa<0then80 

230 

data 

-1 

regel 

140 

96 

70 

pokei,a:b=a+b:i=i+i:goto60 

240 

data 

165,197,201,3,240,7,201,4,240 

regel 

150 

96 

80 

if b<>20068thenprint"CCLR-HOME1fout 

250 

data 

6,76,148,192,76,34,192,169 

regel 

160 

127 


in dataregels! (vanaf regel 240)": 

260 

data 

147,32,210,255,76,161,192 

regel 

170 

71 


b = 0:end 

270 

data 

-1 

regel 

180 

223 

90 

print"data is weggezet" 




regel 

190 

73 

95 

prinfchecksum testen met sys49152" 

*** 

EINDE 

LISTINS *** 

regel 

200 

79 

100 

data 165,43,166,44,133,163,134,164, 




regel 

210 

109 

110 

169, 147 

data 32,210,255,160,0,240,3,32,73, 


syntaxchecksum 1isttestprogramma 

regel 

regel 

220 

230 

106 

225 


192 


regel 

1 249 

regel 

240 

16 

120 

data 32,73,192,208,1,96,32,225,255, 


regel 

2 84 

regel 

250 

163 


208 


regel 

3 125 

regel 

260 

92 

130 

data 3,76,116,164,32,81,192,32,73,1 


regel 

4 2 

regel 

270 

225 


92 


regel 

5 246 

ready 

- 
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Doorzakker 


Een valkuilspel voor de C-16 en Plus/4. Bovenop een groot blok 
ligt een rij met balletjes. Het blok is opgebouwd uit tien lagen, 
welke naar links verschoven kunnen worden. Dit is van belang, 
daar er zich in in elke laag een aantal gaten bevinden. Door nu 
een segment een aantal posities op te laten schuiven, verplaat¬ 
sen zich ook de gaten. 

Het is de bedoeling dat u daarmee alle balletjes door het blok 
naar beneden sluist, in zo min mogelijk beurten. Het verschuiven 
van een segment gaat eenvoudig. Als eerste geeft u het nummer 
van de te verschuiven rij in en drukt op de RETURN-toets en 
vervolgens het aantal posities dat deze naar links moet ver¬ 
schuiven. 


1 rem doorzakker / c 1 6 & plus/4 

2 rem door raimondo eggink 

3 rem uit wychen 

4 rem 1017 

5 rem 

60 print" CCLR-HDME3CZWART3"tab(5)"C3xsp 
tie]*** doorzakker *** 

70 printiprintiprintiprinttab(5)"de 
bedoeling van dit 
B 0 pr inttab (5)"dit «pel isti 

90 printtih(S)*iorg dat alle 
100 printtab(3)"bal let Je* uit het blo 
k 

110 printtab(5)"vallen. 

120 printtab<5) "dit moet u doen door 
130 printtab<5)"eeret het nummer 
140 pr inttab (5) "van de rij 
150 printtab(5)"die u wilt draaien 
160 printtab(5)"in te voeren, C+retur 
n 3 

170 printtab(5)"dan het aantal 
180 printtab<5)"«tapies naar linke. 

190 printiprinttab(5)"veel geluk! 

200 printiprintiprinttab(5)"ela een t 
oete aan voor het «pel 
210 getkeya* 

220 ecnc1rivol 7 1 ww»3087 1 td>ti 
230 -forp-34B7to3497ipokap,Slinextp 
240 -fork-ltoi0i f orp»34B7 + k *40t 03497 +k 
*40 

250 pokep,160inextpinextk 
260 f ork = 11o 10 

270 a»int(rnd(0)*10)ib«int(rnd( 0 )* 10 ) 


280 c»int(rnd( 0 )* 10 )id-int(rnd( 0 )* 10 ) 

290 i-f a-bor c-dthen270 
300 i-fC“banda«dthen280 
310 pok»3487+k*40+a,32 
320 poke3487+k*40+b,32 
330 poke3487+k*40+c,32 
340 poke34B7+k*40+d,32 
350 nextk 
360 bc-49 

370 -f orra«35261o3846etep40 
380 pokera,bc 
390 bc«bc+l 
400 nextra 

410 poke3885,49jpoke38B6,48 

420 goto590 

430 be^be+l 

440 eound1,800,10 

450 print"CH0ME3C5xapatieD" 

46© input"CH0ME3"|hl*ihl“val (hl*)iifh 
l<lorhl>10theneoundl,100,10igoto4 
40 

470 eoundl,900, 10 

480 print"CH0ME3CSxepatlel " 

490 input"CH0ME3"|h2*ih2-val (h2*) i i-fh 


2<lorh2>10theneoundl,100,10igoto4 
70 

500 sound 1,750, 10 
510 p»3487+hl*40 
520 -fork“ltoh2 
530 hv-peek (p) 

540 -f or q *>p t op + 9 
550 pokeq,peek<q+1) 

560 nextq 

570 pokep+10,hv 

580 nextk 

590 -f orp-3887to3487etep-40 
600 gosub700 
610 nextp 

620 i-f ww<3098then430 
630 sp=ti 
640 sound 1,500, 10 
650 getkeywa*iscnc 1 r 

660 pr i nt " C5xneer 3C5xrechts3u had het 
goed " 

670 pr int"C5xrechte3in "be" beurten" 
6B0 pr i nt “ C5xrechts3waar u "int((sp-t 
d>/60)" seconden over deed" 

690 end 

700 -f or qq«p t op +10 

710 i-fpeek (qq) - Slandpeek (qq + 40) -32then 
gosub73@ 

720 nextqq■return 
730 qH»qq 

740 pokeqw,32ipokeqw+40,81 
750 forpc«3927to3937 

760 i-fpeek (pc) «Slthenpokepc, 32 1 pokeww 
,81iww»ww+lisound 1,700,10ire»l 
770 nextpc 

780 i-f rt«lthtnr»-0i return 
790 i-fpeek (qw + 80)>32thenqw»qw + 40igoto 
740 

B00 return 

*** EINDE LISTING *** 


doorzakker cl6 


regel 

1 

49 

regel 

340 

241 

regel 

670 

229 

regel 

2 

209 

regel 

350 

205 

regel 

680 

31 

regel 

3 

79 

regel 

360 

164 

regel 

690 

128 

regel 

4 

88 

regel 

370 

28 

regel 

700 

36 

regel 

5 

143 

regel 

380 

219 

regel 

710 

178 

regel 

60 

27 

regel 

390 

151 

regel 

720 

236 

regel 

70 

13 

regel 

400 

21 

regel 

730 

252 

regel 

80 

167 

regel 

410 

74 

regel 

740 

236 

regel 

90 

245 

regel 

420 

39 

regel 

750 

21 

regel 

100 

77 

regel 

430 

155 

regel 

760 

46 

regel 

110 

172 

regel 

440 

92 

regel 

770 

21 

regel 

120 

129 

regel 

450 

240 

regel 

780 

237 

regel 

130 

244 

regel 

460 

128 

r»g*l 

790 

132 

regel 

140 

15 

regel 

470 

93 

regel 

800 

142 

regel 

150 

23 

regel 

480 

240 



regel 

160 

170 

regel 

490 

136 




regel 

170 

33 

regel 

500 

96 

ready. 



regel 

180 

167 

regel 

510 

1 1 



regel 

190 

84 

regel 

520 

205 




regel 

200 

212 

regel 

530 

179 




regel 

210 

255 

regel 

540 

171 




regel 

220 

193 

regel 

550 

83 




regel 

230 

150 

regel 

560 

21 1 




regel 

240 

204 

regel 

570 

1 88 




regel 

250 

189 

regel 

580 

205 




regel 

260 

180 

regel 

590 

143 




regel 

270 

191 

regel 

600 

36 




regel 

280 

195 

regel 

610 

210 




regel 

290 

233 

regel 

620 

254 




regel 

300 

233 

regel 

630 

242 




regel 

310 

238 

regel 

640 

89 




regel 

320 

239 

regel 

650 

120 




regel 

330 

240 

regel 

660 

229 
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UTILITIES 1 


Screentrans 


Het komt bij programmeurs redelijk vaak voor dat ze in één 
programma meerdere malen een menu of hulpinformatie op het 
scherm willen afdrukken. Het programma Screentrans biedt u 
voor dit probleem een nieuwe oplossing. U kunt door middel van 
het oproepen van de machinetaalroutine tot maximaal 4 scher¬ 
men in het geheugen opslaan en weer terug roepen. 

Na het runnen van het programma moet u het ook maar eens 
listen, als voorbeeld van de werking. Tik vervolgens onderaan 
het scherm SYS 49155,schermnummer (1-4). Wis het scherm 
schoon en tik SYS 49152,schermnummer. Als u alles goed 
heeft gedaan en het juiste schermnummer heeft gebruikt, kreeg 
u uw oude gegevens rechtstreeks vanuit de elektronische 
jachtvelden terug. Handig om te hebben en leuk om weg te 
geven. 


1 rem screentrans / c 

b m-64 

2 rem door raoul teeu 

wen 

3 rem uit gorinchem 


4 rem 388 


5 rem 


6 rem mbv screentran 

s kunt u uw sc 

herm 


7 rem zoals dat op h 

et scherm staa 

8 rem op elk moment 

bewaren en 1 at 

er 


9 rem weer terughale 

n . 

10 rem zo kunt u eenv 

oudig ’pul 1-do 

wn ’ 


11 rem menu’s gaan vei 

rwerken,of een 

hul p 


12 rem scherm op een i 

eenvoudige man 

i er 


13 rem op elk moment ti 

erugroepen. 

14 rem *** commando-fi 

ornaat *** 

15 rem sys49155,a (, 

a = l , 2,3 of 4) 

16 rem -bewaart schei 

rmnummer a 

17 rem ook de kleun 

en worden bewa 

ar d 


1B rem sys49152,a (, 

a=l,2,3 of 4) 

19 rem -haalt schermi 

nummer a terug 

20 rem op elk moment z 

i j n zo maximaa 

1 

21 rem 4 schermen tege 

1 i i k opgeslage 

n . 


22 rem deze schermen nemen totaal ge 

en 


23 rem basic-geheugen 

in beslag. 

24 rem * veel plezier i 

e- 1 

net screentran 

=» . 

25 fora=0tol52:readb:poke49152+a,b:next 

26 data76,47,192,32,13: 

2,192,133,254, 

24,105,16,133,2,120 

, 169,48, 133,1, 

162,4 


27 datal34,252,32,111, 

192,169,55,133 

,1,165,252,24,105,208,133,252,165 

,2,133 


28 data254, 162,4,32, 1 1 

1 , 192,88,96,32 

,132,192,133,252,24, 

, 105, 16, 133,2, 

162,4 


29 datal34,254,120,169, 

,48,133,1,32,1 

11,192,162,4,165,2,1 

133,252,169,21 

6,133 



31 data 145,253,200,20B,239,230,252,2 
30,254,202,208,232,88,96,160,0,13 
2,251 

32 datal32,253,177,251,145,253,200,2 
08,249,230,252,230,254,202,208,24 
2,96,32 

33 data0, 226,138,208,5,162,14,76,55, 
164,201,5, 176,247, 10, 10,24, 105,22 
0,96 

*t* EINDE LISTING *tt 


screentrans 

regel 1 11 
regel 2 9S 
regel 3 2 C . 
regel 4 5$ 
regel 5 1 i 
regel 6 IS 
regel 7 17 
regel 8 22 
regel 9 27 
regel 10 1 
regel 11 1 
regel 12 1 
regel 13 E 
regel 14 1 
regel 15 1 
regel 16 1 
regel 17 1 
regel 18 1 


1 1 1 

regel 

19 

132 

99 

regel 

20 

8 

29 

regel 

21 

122 

50 

regel 

22 

99 

143 

regel 

23 

217 

193 

regel 

24 

79 

176 

regel 

25 

206 

233 

regel 

26 

1 00 

223 

regel 

27 

146 

101 

regel 

28 

98 

224 

regel 

29 

100 

1 1 1 

regel 

30 

54 

88 

regel 

31 

100 

1 6 

regel 

32 

205 

137 

regel 

33 

48 


ready. 


d at a254, 160,0, 132,251, 132,253, 169 
,48,133,1,177,251,72,169,55,133,1 
, 104 


Schudden 


Een zeer kort en uiterst fraai stukje programmeerwerk. Nadat je 
de weinige regels hebt ingetikt en het programma runt lijkt het 
alsof je aan een nieuwe computer toe bent. Eventueel voeg je 
nog een POKE 808,255 aan het programma toe, hetgeen er voor 
zorgt dat de RUN/STOP RESTORE-funktie wordt uitgescha¬ 
keld. Het risico van een uitgedunde vriendenkring of je compu- 
terinkopen verder van huis te moeten doen in de toekomst, is 
hierbij niet uitgesloten. 


1 rem schudden / cbm-64 

2 rem door e. meijer 

3 rem uit broek op langediik 

4 rem 373 

5 rem 

10 f or a = 11 o7 

20 poke53265,(peek<53265)and24B)+ a 
30 pok e53270, (peek ( 53270>and251+a)+a 
40 nex t:got o 10 

*** EINDE LISTING *»« 


schudden 

regel 1 
regel 2 
regel 3 
regel 4 
regel 5 
regel 10 


1 1 7 

regel 

20 

105 

242 

regel 

30 

70 

28 

regel 

40 

166 

44 




143 




128 

ready. 
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Ruimteslang; 


Dit spel bevat maar liefst zeven niveau’s. Het programma zal 
zichzelf overigens vernietigen, nadat iemand dit heeft gehaald. 
Het doet mij groot plezier om te constateren dat de computer 
ook niet altijd even goed tegen zijn verlies kan. Let er dus wel op, 
dat het programma naar band is weggeschreven, voordat het 
wordt gespeeld. 

De opzet van het spel is erg eenvoudig. De speler is een slang 
die zich door een veld, dat met sterren bezaaid is, een weg naar 
beneden zoekt. Een botsing met een ster loopt gegarandeerd 
fataal af, deze dienen dus ontweken te worden. Het spel kan 
zowel met een joystick als met het toetsenbord worden 
gespeeld. 


1 rem rulmteiUng / c-16 & plus/4 

2 rem door i. van oliën 

3 rem uit boven-1eeuwen / 0BB79-353 
7 

4 rem 1018 

5 rem 

10 colore,licolor4,l:printchr»(147)chr$ 
(8)chrt<142)spc(10) "CGEEL 1 C2xneer 1 
[RVS-aan ] i t RVS-ui t loyst ick of [RVS-aa 
nlkCRVS-uitleyboard?" 

20 pokeSBè, 1 03 i g et g $ : ifg*<>"j"andg*< 
>"k"then20 

30 i f g S — " k " andg*<>" j " then50 
40 e* = ,, d"itt="6";goto60 
50 eS=" , “ I f *=" „ " 

60 print" CCLR-HOME]"icolor®,6,2ichar 
,10,2,"[GEEL!*»* C1.rood]ruimte 
slangt6EEL ] ***" 

70 char,0,5,"CCYAANlontwiik de eterr 
en door ie slang er doorheen te s 
turen meti" 

80 fory«lto7icolorl,B,yichar,3,10, "C RVS- 
aan ]< C RVS-uit 3 = linksClSxspatle] 

CRVS-aan3>CRVS-uit3 = rechts" 

90 char,9,15,"zullen we nu beginnen?" 

100 char,9,17,"druk dan op een toets!" 

■ nextys z = 3272! vol8 
.10 getgti i-f g*=" "then80 
.20 n=n+1:ifn>7then500 
30 i fn = 11hens = 42:ts = 42:as = 8 
40 ifn=2then s= 118:ts=86: as= 10 
50 ifn=3thens=123its=91ias»12 
60 ifn»4thenB»35its=35ias=14 
70 i -f n = 5t h en s = 43 i t s = 43 i as- 1 6 
B0 ifn-6thens-B8its«24ias-18 
90 lf n = 7thens«=122i ts = 90i as=“20 
100 colorl,S,3icalar0,5,niprlnt"CCLR-HOME 
3"iforr=3072to311l! pokeB06, 103 
!10 poker,81:sound 1, (r-3071)*25,2:next 
r 

!20 torr*311Ito4072step40i poker,81isound 
l,r/4,2snextr 

:30 forr»4072to4032step-lipoker,81isound 
1,(r-4032)*25,2snextr 
40 torr"4032to3072step-40ipokar,81isound 
l,r/4,2inextrichar,15,12,"CWITlni 
vo"jprinttab(20)n 

50 ford=95tol28stepl6iforb»2049to208 
7ipokeb,dspokeb-l,d-16inextb 
60 forb“2087to3048step40ipokeb,d:poke 
b-40,d-16inextb 

70 forb=3049to3008step—1:pokeb,d:poke 
b+1,d-liinextb 

80 forb=300Bto2048step-40: pokeb, ds poke 
b+40, d-liinextb: poke806,101: nextd 
:z =z +S0 

?0 soundl,810,15isoundlJ 770, 15isound 


1,810,15:soundl,798,15isoundl,770 
, 151sound 1,810, 15 

300 soundl,770,15ipoke806,103ic“0rprint 
"CGEEL]CCLR-HOME3"icolor0,15,3sx = 

20 

310 q“int(rnd<l)*3B)iprinttab(q+l)chr* 
(s)ic-c+lspoke4032,42ipoke4071,42 

320 poke3008,204ipoke3047,204 
330 ifpeek(z + x)=tsorpeek <z+x)=42then3 
80 

340 get a* > i -f a$ = ett henx =x - 1 
350 if a* = f *thenx»x + l 
360 pokez+x , 81 s i-f c = 500then470 
370 pokez+x-1024,100!goto310 
380 sound3,750, 900! f or t *»3072t o4071 i a = 
peek(t) : ifa=32ora=81thennextt 
390 k»a+12Bi i-f k>255thenk=a-128 
400 poket,kinextiforsc"lto25iprint!sound 
l,sc*40,2:nextsc 
410 c**c-as i i f c< 0thenc = 0 

420 color1,4,7:print"je hebt"jc;"ster 
ren gepasseerdCneer3" 

430 pr int " C1.roodInog een keer dit ni 
vo (j/n)?" 

440 getbti i f b*< >“j " andb*< > " n " t hen440 
450 i-fb$ = "J "then290 
460 n=0!z=3272igotol20 

470 print"Cgriis 31gosd gedaan, ie he 

bt 500 sterrenCSxrechtsügepasseer 

d " 

480 pr int “ Cgriis 1 3C2xneer 1C8xrochts3 
druk op de spatiebalk" 

490 getl*i ii l*-chr*<32)thenl20ielse49 
0 

500 print "CCLR-HOME! "tab(6)"C2xneer 3 J 
e hebt alle nivo’s gespeel d" i -foru 
=1000to500step-20isoundl,u,5inext 
u 

510 sys62116 
*** EINDE LISTINB *** 


ruimteslang cl6 


regel 

1 

173 

regel 

240 

121 

regel 

2 

149 

regel 

250 

25 

regel 

3 

123 

regel 

260 

235 

regel 

4 

89 

regel 

270 

42 

regel 

5 

143 

regel 

280 

109 

regel 

10 

189 

regel 

290 

135 

regel 

20 

1 15 

regel 

300 

37 

regel 

30 

79 

regel 

310 

59 

regel 

40 

156 

regel 

320 

133 

regel 

50 

83 

regel 

330 

204 

regel 

60 

27 

regel 

340 

48 

regel 

70 

59 

regel 

350 

240 

regel 

80 

207 

regel 

360 

25 

regel 

90 

229 

regel 

370 

121 

regel 

100 

239 

regel 

380 

209 

regel 

1 10 

65 

regel 

390 

1 1 

regel 

120 

96 

regel 

400 

247 

regel 

130 

127 

regel 

410 

46 

regel 

140 

229 

regel 

420 

184 

regel 

150 

224 

regel 

430 

202 

regel 

160 

1 79 

regel 

440 

1 10 

regel 

170 

180 

regel 

450 

115 

regel 

180 

191 

regel 

460 

154 

regel 

1 90 

225 

regel 

470 

152 

regel 

200 

215 

regel 

480 

188 

regel 

210 

135 

regel 

490 

91 

regel 

220 

145 

regel 

500 

81 

regel 

230 

3 

regel 

510 

158 


ready. 
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Mousetrai 


Het engelse woord Mousetrap staat voor muizenval, het spreekt 
voor zich dat u in dit spel de muis speelt. Deze moet zich als het 
ware zich een weg door een kaasfabriek eten. De in overvloed 
aanwezige katten eten natuurlijk geen kaas maar muizen. Daar 
er zich maar één muis in het pakhuis bevindt, moet deze wel erg 
op zijn tellen passen. 

Het spel hoeft niet persé fataal af te lopen daar de muis enige 
wapens tot zijn beschikking heeft, zo kan hij deuren open en 
dicht laten gaan, of zichzelf naar een andere plek transporteren. 
Al de nodige uitleg wordt u door het programma zelf verstrekt. 


1 ram mousetrap / clê & plus/4 

2 ram door raimondo eggink 

3 ram uit wychan 

4 ram 1017 
3 rem 

10 print" CCLR-HOME3"tab (10) " * * * mous 
atrap *** 

20 pr intiprinttab<5)"u moeti 
30 printtab<5>"zoveel mogeliik kaas 
eten 

40 printtab(S>"zonder opgegaten te 
30 prInttab(3)"worden door katten. C 
* 3 

60 pr inttab(3)"u bent de muis. C # 3 
70 pr i ntiprinttab(5)"toetseni 
80 pr inttab(5)"corsor toetsen 
90 printtab(5)"om uzelf te verplaats 

en 

100 pr inttab(5)“in die richting. 

110 pr inttab(5)"-h- voor home 
120 pr inttab(3)" C1inks-boven3 
130 pr i n11ab(5)"-t- voor transfer 
140 pr inttab(3)"-r- om de rode 
150 printtab<5>"deuren om te zetten 
160 printtab(5)“en —g— voor de 
170 printtab(5)"groene deuren. 

180 prlntiprintiprinttab(B)"tit veel 
geluk! *** 

190 pr i ntipr i nttab(5)"sla een toets a 
an. 

200 getkeyw* 

210 vol8ipoke652B6,peek(63286)and239 
220 d ata3251,66,3310,67,3343,66,3365, 

66.3421.66.3423.66.3303.66.3313.6 

6.3573.66 

230 data3375,66,3869,66,3B91,67,3975, 

67.4005.66.4022.66 

240 data33B2,67,3534,67,3614,67,3852, 

66.3910.67.3923.66.3936.66.3981.6 
7 

250 data3129,66,3345,66,3350,67,3434, 

66.3505.66.3525.66.3527.66.3757.6 

6.3759.66.3857.66 
260 data3927,66 

270 dat a3341,66,3386,67,3462,67,3464, 

67.3466.67.3486.67.3492.66.3566.6 

7.3718.67.3777.66 
280 data3798,67,3888,67 
290 d i msp(10) 

300 restore310ifort-ltol0:readsp(t)s nsxt 
t1mp=3932 

310 data3356,3600,3878,4006,3330,3494 
,3701,4026,3224,3390 
320 scnc1r 
330 color4,3,3 

340 print" rCCCCCC-rCCC-rCCC-rC-rC-rCCC-rCCC 
tCCCtCCCtCCCt" 

330 print"B!WWWWWBWWWBWWWBWBWBWWWBWWW 

BWWWBWWWBWW!B" 

360 print"BWCCC-iUBWBUBMBWBNBMBMBUBMBW 
BWBWBWBWBWBWB" 


370 pr inf'BWWWWBWBWBWBWBWBWBWB!BWBWBW 
BMBNBWBWBWBWB" 

380 print " l-CCCWB! WWBWWWBWWWBWBWBWWWBW 
WWBWWWBWWWBWB" 

390 pr int "BWWWW KCCC4CCC4CCC4C-‘■C4CCC+C 
CC+C-rC 4CCC4CJ * 

400 pr int"BWCCCHWWWBWWWBWWWBtWWBWWWWW 
WW !BWBWWW fCf" 

410 color4,4,3 

420 print"BWWWWBWBWWWBWBWBWWWBWWWrCCC 
CC+ +C+ i WBWB" 

430 print *• KC-rCWBW fCCC+C-* W ‘-CCC-'-rCWBWWW 
WWBWB!BWBWBWB" 

440 print“BWBWWBWBWWWWWWWWWWWWBWWBWCC 
-rC-*- 4 + i WBWB ” 

450 print "BW ■-rCH WBW rCCC-r -rCC-i W WWBWWW 
BWWWBWBWBWBWB" 

460 pr int 11 BWWBWBWBWBWWWB ! BWW L C-*”r 4C-i W 
BW rC-MH WBWBWB " 

470 print"HCC J WBWBWBWCC4 WWWWB ! BWBW 
BWBWWWBWBWBWB" 

480 pr int"BWWWWBWBtBWWWBWWBWWBW f HWWW 
BWBWBWWWBWBWB" 

490 print" BWCCCH WBW fCCW fCW fCC- 1 WBW *-CCC 
WBW L CCC J WBWB" 

300 print"BWWWWBWBWBWWWBWWBWWWWBWWWWW 
WWtWWWWWWWWWB" 

510 color4,B,3 

520 print" fCCCWf H WBWCCi W r J W rCC J W rC-rC 
CCCCCCCCCCCWB" 

330 print"BWWWWB!BWBWWWBWBWWBWWWWBW W 
WWWWWWWWWWWWB" 

540 pr int “BWCCC4 4C+CCWBWBWCJ W rCC J W l-C 
C-rCCCCCCCC-iWB" 

530 pr int"BWWWWBWBWWWWWWWWWWBW WWWWBW 
WBWWWWWWWWBWB" 

560 print" hCCCWBtBWCCCC-rC-r C+C+CCC-r+C 
! BW rCCCCCC-+ f " 

370 print"BWWWWBWBWWWWW WBWWWWttWWW WW 
WBWBWWWWWWWWB" 

580 pr int "BWCCC J W >-CCCCCf W L CCCCCCCC-^CC 
C-* i WCCCCCCWB" 

390 pr int "B!WWWWWWWWWWWBWW!WWWWWWWWWW 
UWWBWWWtWWW!B" 

600 color4,6,3 

610 poke4032,109iforp«ltol2ipoke4032+ 
p,67ineKtpipoke4045,113iforp«14to 
29npoke4032+p,67ïnextp 
620 poke4062,113sforp-31to38«poko4032 
+P,67inextpipoke4071,125 
630 re3tore220iforre*»lto23ireadrl,r2i 
pokerl-1024,53mextre 
640 restore250«forre“lto23ireadrl,r2i 
poker 1-1024,501nextre 
630 color4,2,6 

660 poke652B6,peek(63286)or16 
670 getkeywa* 

680 td==t i 

690 gosub860 

700 gosubll80 

710 ifsc<390then690 

720 bo-bo+5isc“0 

730 soundl,900,10 

740 goto300 

730 soundl,400,10 

760 Sp M t1 

770 getkeywa* 

780 scnclr 

790 char,10,10,"hel aas bent u zojuist" 

800 printspc(13)|"uitgeschakeld" 

810 ts=sc+bo*210-int((sp-td)/60) 

820 pu*»str*(ts> 

830 char, 20,20, "score-"■char, 26, 2@, pu 
*ichar,27 + 1 en(pu*),20,"punten" 

840 getkeywa* 
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end 

getha$i i-fha*“" "thenreturn 
ifh**«"top]"thenri»-40igota960 
ifha*«“g"thengosubl020 

[rechts] 11 thenri*l i goto960 
i-fh**«"r“th»ngo*ubn00 
if ha$““[neer]"thenri"40igoto960 
i -f h a * “ " 11 lnks] "thenr i **— 1 i g o t o 9 6 0 
i'fha*" H t"thengo«ubl330 
i-fha*="h" thengosubl390 
return 

p-peek (mp+ri) i i-fp<>87andp<>33andp 
< >42andp< >32thenreturn 
i‘fp«B7thenic»*c+l i soundl ,800, 10 
i -f p«33t h«nbo*bo+1 1 sound 1,900, 10 
1 pokemp,32imp«mp+riipokemp,35 
' i-f p=42then750 
return 

gg-gg+li 1 -f gg-3t hongg» 1 
i-fgg«2thenl070 

restore220iforre-ltol5ireadrl,r2i 

pokerl,r2mextre 

re«tar»240iforr»*lto8ir»adrl,r2ipoki 

r1,32inextre 

return 

restore240«-forre«lto8ireadrl,r2ipoki 
r1,r2inextre 

restore220i forre«ltol5ireadr1,r2s 

pokerl,32:nextre 

return 

rr»rr+liifrr»3th»nrr*l 
lfrr-2then1150 

ree tor o250i ■forre-ltolli readr 1 , r2i 
poker 1,r2s n ex tra 

restore270iforre-1tol2ireadr1,r2» 

pokerl,32inextre 

return 

reetoro270i f orre-ltol2ireadr1,r2i 
pokerl,r2inextre 

reetoro250iforro*ltollireadrl,r 2 i 

pokerl,32inextre 

return 

for»«ltol® 

ri"int(rnd(0> *6)—1 

i-frl>2thengo*ubl280 

l-fri»0thenri=-40 

ifri“2thenri«40 

p-poek <sp (e) + r 1) « i-f p< >B7andp< >33and 
p< >35andp< >32then 1270 
ifp-35then750 

pokesp(s),pi*p(#)-*p(«)+riipok»»p 

<s),42 

gosub860 

nexteireturn 

ifmp>ep(e)thonl310 

i-fep(»)-mp>40thenrl«-40i return 

r i“-lireturn 

1-fmp-ep (e) >40thenrl"40ireturn 
r 1 = 1 1 return 

te«t» + li i -f t e>5t henr etur n 
pokemp,32 

mp“int<rnd<0>* 1000)+3072 

p-peek <mp>i ifp<>87andp< >33andp< >4 

2andp<>32then 1350 

pokemp,35 

return 

pokemp,32imp-3114ipokemp,35ireturn 


moueetrap c!6 


*** EINDE LISTING *** 


regel 

3 

79 

regel 

4 

88 

regel 

5 

143 

regel 

10 

123 

regel 

20 

83 

regel 

30 

47 

regel 

40 

197 

regel 

50 

150 

regel 

60 

10 

regel 

70 

235 

regel 

80 

182 

regel 

90 

188 

regel 

100 

171 

regel 

110 

205 

regel 

120 

156 

regel 

130 

21 

regel 

140 

183 

regel 

150 

142 

regel 

160 

191 

regel 

170 

109 

regel 

180 

38 

regel 

190 

212 

regel 

200 

21 

regel 

210 

134 

regel 

220 

109 

regel 

230 

221 

regel 

240 

5 

regel 

250 

41 

regel 

260 

240 

regel 

270 

62 

regel 

280 

151 

regel 

290 

219 

regel 

300 

138 

regel 

310 

27 

regel 

320 

232 

regel 

330 

217 

regel 

340 

148 

regel 

350 

34 

regel 

360 

150 

regel 

370 

48 

regel 

380 

112 

regel 

390 

239 

regel 

400 

228 

regel 

410 

218 

regel 

420 

78 

regel 

430 

29 

regel 

440 

165 

regel 

450 

133 

regel 

460 

166 

regel 

470 

1 1 

regel 

480 

144 

regel 

490 

149 

regel 

500 

32 

regel 

510 

222 

regel 

520 

1 18 

regel 

530 

43 

regel 

540 

209 

regel 

550 

246 

regel 

560 

23 

regel 

570 

128 

regel 

580 

126 

regel 

590 

82 

regel 

600 

220 

regel 

610 

29 

regel 

620 

238 

regel 

630 

255 

regel 

640 

255 

regel 

650 

219 

regel 

660 

3 

regel 

670 

86 


regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 


680 
696 
700 
710 
720 
730 
74© 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1 100 
1110 
1120 
1 130 
1140 
1 150 
1160 
1 170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 


ready. 
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Codewoord 


Er zijn voor de Commodore-64 een groot aantal leuke program¬ 
ma’s geschreven; een C-16 & Pius/4 gebruiker kan deze 
meestal niet op zijn machine aan de praat krijgen. Dit komt 
voornamelijk doordat er dan een aantal poke-opdrachten in de 
listing staan. Deze opdrachten zijn nogal moeilijk te doorgron¬ 
den. Ze zetten een bepaalde waarde in een geheugenlocatie en 
dat kan verschillende dingen tot gevolg hebben, zo kan er een 
geluidseffect worden gegeven, men verandert een schermkleur 
en ga maar zo maar door. Die Poke-opdrachten moeten bij de 
Commodore-64 wel worden gebruikt als men een beetje fraai 
effekt wenst, daar de Basic commandoset erg beperkt is. 
Helaas verschillen de geheugenadressen tussen de commo¬ 
dore computers onderling nogal en hierdoor zal een C-16 op tilt 
slaan wanneer er een Poke-opdracht van een Commodore-64 
zomaar wordt ingetikt. 

Maurizio Podda uit Rotterdam heeft zich op dit probleem 
geworpen en zal voor ons blad de leukste listings gaan vertalen. 
Door de originele C-64 listing naast de vertaalde te leggen kunt u 
zichzelf het een en ander aanleren. Het spreekt voor zich dat u 
geen listings voor ons blad hoeft te gaan vertalen met uw nieuw 
verworven kennis, wij plaatsen enkel de vertaalde listings van 
Dhr. Podda; deze heeft tenslotte al het moeilijke onderzoek naar 
de geheugenadressen gedaan. 

Het spel Codewoord is een versie van het Mastermind spel. In 
plaats van cijfercodes werkt het met vierletterige woorden. 


1 rem codewoord / cló & plus/4 

2 rem bewerkt door maurizio podda 

3 rem uit enschede 

4 rem orig. r.wolswiik (c-64) 

5 rem 1016 

6 rem 

9 co 1or4, 6 scolor0,4 

10 dim cw*(100)igoaub 450 

20 gosub 340:a* =""s input"[2xneer 3ERVS-aa 
n3CROOD3codewoord d.m.v.de comput 
er (j/n)ERVS-uit3" 5 a* 

30 if a*< >"j " then 70 

40 z-int < 100 *rnd <@) +1 ) « i-f cw* (z ) - " " then 
40 

50 w*=cw*(z)icw*(z)“”"iw"w+l:if w>90 
then w=0:restoretgosub 450igoto 
40 

60 goto 110 

70 gosub 340sw*“" " : input"E2xneer 3EGROEN3 
codewoord (4 letters)"jw* 

B0 if len(w*>"4 thenl 10 

90 print"[RV3-aan3 CBLflUWlniet meer 
of minder dan 4 letters s.v.p!" 

100 for wacht"1to4000inextigoto70 
110 rt“315Bixl"3139iil"3146igosub340 
120 t“li-forpr"ltal 0 jp“ 0 «xl“ 0 ix 2 = 0 ixl“ 
x1+B0 j il-jl+80srt-rt + B0 
130 ifpr=1 0thent=0 

140 printiprintjprinttab<t>;str*(pr); 

"[bruin].Clêxspatielr r r rEBxlinks3" 

150 p = p + 1 : i -f p >4t hen gosub 430 
160 get rw*(p)iif rw$(p)»”" thenl60 
170 ifp>4andrw*<p)=chr*<13) then 220 
1B0 i-f p >1 andrw* (p ) “chr * (20) then print 
“ Ebruin3El inks3rC2xl inks3 11 5 !p=p-l 
sgosub420:gotol60 
190 i-f p >41 hen 1 60 

200 ifasc(rw*(p))<65orasc(rw*(p))>90 
then160 

210 print"Erechts3"jrw*(p)|igotol50 


220 rem ** letters op juiste plaats * 

* 

230 l“0igosub410 

240 fork=lto4iiflw»(k)-rw*(k) thenl~l 
+ 1 :rw* ( k)» " ":1w*(k)=" "sgosub 370 

250 nextk « i-f 1 =4then pr i n t " E n eer 3 " t got o 
310 

260 rem ** alleen juiste letters ** 

270 forkk=lto4:fark“lta4 

2B0 i-frw* (k) =lw* (kk) t h en r w* ( k ) - " " 1 1 w 
*(kk)“" "sgosub390 
290 nextk,kk,prigosub410iprint 
300 pr i nt " [neer 3E1.groenIcodewoord wa 
si" |i-forp"ito4iprint lw*(p)| H "1 1 
nextsprint". " ; 

310 a* = " " 1 input"ERVS-aan3El.blauw3op 
n i euw (j/n) " »a* 

320 ifa*<>"n" then 20 

330 print"CCLR-H0ME3 CRVS-aan3[CYAAN3e 
inde programmaCRVS-uit3"send 

340 print"[CLR-H0ME3 Coranja3 

—--———■— -———— || 

350 print"ERVS-aan3EgriJs 2 3 C 10x sh i-f t-SPA 
TIE3[griis 13 * *tcodiwoord* * *Cgriis 23 
C2xahift-SPATIE][griJs 13vvvv[griii 2 
3 C4xshi-f t-SPATIE3 [gr i Js 1 3+ + + +[gr i js 
23 [ sh i-ft — SPATIE3 " 

360 print"ERVS-aan3Eoranie3■«■■■■■■«■ 

■■■■■■■«■«■■■■■■■■■■■■■■■»■■■■[op]" 

1 return 

370 rem ** pinnetjes letters op juist 
e plaats * * 

380 pokexl+xl,Blipokexl+xl+40,66ixl"x 
1 +1ireturn 

390 rem ** pinnetjes juiste letters * 

* 

400 pokejl+x2,81ipokejl+x2+40,66ix2"x 
2 + 1 1 return 

410 for sp"1to4i1w*<*p)“mid*(wt,sp,1) 
s nex t 

420 -for wia»rt to r t + 5 1 pok ew i s, 32 1 n ex t 
:return 

430 pokert,146ipokert+l,133lpokert+2, 
14B:pakert + 3,149«pokert + 4, 146 
440 pokert+5,142Ireturn 
450 rem ** codewoorden ** 

460 -f or i n" 11 o 1 20 i r ead c w* ( i n ) 1 r et ur n 

kaas","nimf", 

, "baas", "kaal" 

kust","zaak", 

,"koen","most " 

boog","mast", 

, " r i J k " , " b i j 1 " 

kuur","zuur", 

, "bram","koos" 

bank","poot " , 

,"shag ","bies" 

voet","zalm", 

,"koud " , " snel” 

vlag","erwt " , 

, "eind" , "show" 

ruit","kiem", 

, "mars " , "trap" 

dorp", "vork" , 

, "klos", "jong" 

, Lr am 

560 data "weer","geel " 


470 data "veel ”, "meel ", 
"balk","zeem","kast 
,"keel" 

4B0 data "boek","boom" , 

"kies ","inge","toen 
,”mond " 

490 data "lont","boeg", 
"hugo " , "eelt", "dijk 
, "koel " 

500 data "vatt","muur", 
"buur", "huif", "zeug 
, "boos" 

510 data “wi in","zalf " , 
"land" , "ziek","bier 
, "1ieB" 

520 data "hier","beek", 
"lamp","been","hout 
,"loof" 

530 data "disk",“flop" , " 
"stom","gids", "puls" 
, "wesp " 

540 data "vera","ooit", " 
"riem", "vlas ", "wolf " 
, " e 1 s a " 

550 data "henk", "staf ", " 
“kolk", "voer", "melk" 


rood 


kras 















PRINT-OUT C-16 • PRINT-OUT C-16 • PRINT-OUT C-16 • PRINT-OUT C-16 • PRINT-OUT C-16 


"moor","bout","spar","aard","harp" 
."blad" 

S7@ data "m*ns","fiat","peul ","paal ", 
"f r is" , "f ord","p ink ","deur"," xzap " 
, "geld" 

58@ data "stad","ala*",“fire","muis", 
"neus","gang","ring","beuk","trap" 
, " iuli" 


*** EINDE LISTINB *** 


codewoord 

c 16 




regel 

1 

219 

regel 

100 

41 

regel 

2 

175 

regel 

110 

55 

regel 

3 

192 

regel 

120 

237 

regel 

4 

19 

regel 

130 

29 

regel 

5 

87 

regel 

140 

254 

regel 

6 

143 

regel 

150 

242 

regel 

9 

46 

regel 

160 

1 18 

regel 

10 

134 

regel 

170 

70 

regel 

20 

101 

regel 

180 

162 

regel 

30 

240 

regel 

190 

254 

regel 

40 

149 

regel 

200 

187 

regel 

50 

7 

regel 

210 

55 

regel 

60 

27 

regel 

220 

146 

regel 

70 

22 

regel 

230 

138 

regel 

80 

57 

regel 

240 

35 

regel 

90 

97 

regel 

250 

176 


regel 

260 

223 

regel 

270 

147 

regel 

280 

155 

regel 

290 

140 

regel 

300 

132 

regel 

310 

239 

regel 

320 

239 

regel 

330 

120 

regel 

340 

210 

regel 

350 

90 

regel 

360 

25 

regel 

370 

66 

regel 

3 80 

242 

regel 

390 

222 

regel 

400 

218 

regel 

410 

4 

regel 

420 

206 

regel 

430 

1 1 1 

regel 

440 

167 

regel 

450 

112 

regel 

460 

97 

regel 

470 

31 

regel 

480 

150 

regel 

490 

104 

regel 

500 

17 

regel 

510 

97 

regel 

520 

129 

regel 

530 

205 

regel 

540 

180 

regel 

550 

179 

regel 

560 

101 


MJ datavisie levert nu : 

• I U V software & informatie - services 


Met alle extra’s, 512 KB RAM (max. 1 MB), 20 MB 
Hard disk, interfaces, 6 en 8 MHz mode, 1,2 MB 
floppy drive, monochrome monitor, legale BIOS, 
legale DOS 3.1, toetsenbord, een compleet systeem. 

Amerikaans fabrikaat, dus kwaliteit zonder zorgen 
van eersteklas leverancier. Systeem getest, 24 uurs 
burn-in, eventueel keuze uit aanvullende periferie. 


regel 570 
regel 580 


ready, 


PRIJS ƒ 7299,- 
excl. BTW 


Wij leveren een speciale Desktop-publishing AT, 
inclusief muis, speciale videokaart en het pro¬ 
gramma Click-Art, voor ƒ 7799,- Daarmee kun¬ 
nen ook gewone NLQ matrixprinters aangestuurd 
worden, speciale laserprinter-drivers zijn ver¬ 
krijgbaar. Vraag demonstratie!! 


inclusief 

installatie-service en 
1 jaar garantie 


DATAVISIE 

Forel 40, 1261 PK Blaricum 
® 02152-65695 

Inschrijv. KvK Hilversum 36273 
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Schietschijf 


Regelmatig treft u in Commodore-lnfo een schietspel aan, het 
blijkt nu eenmaal dat deze spelen door veel lezers worden 
gewaardeerd. Laat ik er maar geen doekjes omwinden, ik speel 
deze spelen ook langdurig onder het mom van ze te testen. 
Een spel met drie niveau's stamt van de hand van Wim 
Stadhouders, langzamerhand een bekende in deze rubriek. De 
mensen die het schieten snel onder de knie krijgen, wil ik dan 
ook vooral aanraden om eens een hoger niveau te proberen. 



100 rem schietschijf / cbm-64 
110 rem door w.a. stadhouders 
120 rem uit terneuzen 
130 rem 375 
135 rem 

140 print”CCLR — HOME]“:g o t o 6 2 0 
150 rem lus 

160 poke53278,0:wl=wl+l: ifwl<5then270 
170 i=127-peek(56320) 

180 ifi>15then240 

190 if(i and 1)= 1 thenyv = yv-vsJ ifyv<50then 
y v = 50 

200 if(i and2)=2thenyv=yv+vs:ifyv>220 

thenyv=220 

210 if(i and4) =4thenxv = xv-vs: ifxv< 15then 
x v= 1 5 

220 if(i and8)=8thenxv = xv+vs:ifxv>255 
thenx v = 255 

230 poke53248,xv:poke53249,yvs goto270 
240 poks54278,76irem vuren 
250 poke54276, 129:poke54273,20:poke53 
280,5sforp=ltol00:next:pokeh4276, 

128:wl=0 

260 poke53280,3:ifpeek(5327B)=3then42 
0 

270 rem schi i f 
280 i f sw = 0t hen310 
I 290 sw=sw—l:ifsw=0thenpoke54278,76:poke 
54276, 129s poke53269,3ï poke54273, 4 
0 

, 30© gotoi50 


310 poke54276,128 
320 ifsr=lthen350 
330 xs=xs+ss:ifxs>280then480 
340 goto360 

350 xs=xs-sssifxs<0then480 
360 ifx s >255thenpoke53264,2:poke53250 
,xs-255s goto3B0 
370 poke53264,0!poke53250,xs 
380 rem vertikaal 

390 ba=ba-va:ys=ys-ba:poke53251,ys 

400 getatiifa*=""then150 

410 poke53269,0:goto620 

420 rem raak 

430 poke54278,68 

440 poke2041,15:sc=sc+int((ss+1)/3)iif 
sc>tsthents=sc 

450 print“[HOME 1tneer 3 Cl.b1auw3 CRVS-aan3“ 
sciprint"CRVS-aanl"ts 
460 poke54276, 1 29:forp = 11o50:poke5427 

3,50-pspoke53251,peek(53251)+lsnext 
470 poke54276,12Bsgotol150 
480 rem gemist 
490 poke54278,68 

500 poke54276,33:poke54273,28:poke542 

72,48:pake53280,10:forp=lto400:next 
510 poke54273,1 4:poke54272,24:poke532 
80, ll:forp = ltoB00snext 
520 poke532B0,3ipokeS4276 l 32igotol150 
530 rem einde spel 
540 forp=ltol000ï next 

550 print" CH0ME3 C6xneer3 CBLAUW3einde 
spel " 

560 poke53280,5»poke54278,70 

570 poke53269,0ïpoke54273,16«poke5427 

2, 195i poke54276, 17 l f or p=* 11 o400 1 nex t 
580 poke54272,31iforp s 16ta21step.2:poke 
54273,psnextsforp=lto400:next 
590 forpB’21to25step.2ipoke54273,pinext 
:forp«*lto400:next:poke54272, 135 
600 forp=25to33step.2ipoke54273,p:next 
iforp=Ito 1000:next 
610 poke54276,16iforp=ltol000inext 
620 poke53281,15:poke53280,15iforp=54 
272to54296:pokep,0inext 
630 poke54278,64:pake54296,15 
640 print" CCLR-HOME3”irestore:a*="sel 
eet level 1-2-3C3xspatie3" 

650 forp x lto5ireada:readb;poke54273,a 
:poke54272,b:poke54276,33 
660 print"tPURPER 3"a*"CBR0EN3"a* M CBLAUW3" 
at"CGEEL 3"a*; 

670 print"[R00D3"a* H CBR0EN3"a*"tBLAUW3" 
a*"CGEEL3"a*| 

680 forq=1to30lnextinext 

690 data31,165,33,135,42,62,50,60,67, 

15 

700 print”CR00D3"a*"C6R0EN3"a$"C BLAUW 3" 
a#"C6EEL3"a*"CROOD3"a*;"C8ROEN3se 
lect level 1 " ;spoke54276,32 
710 poke2023,45ipoke56295,5 
720 getai 

730 ifa»="e"then640 

740 ifa*="l"thenvs=4:ss=3igoto7B0 
750 if a*«="2"thenvs = 6i ss=5i goto7B0 
760 ifa*="3"thenvs=9:ss=8igoto7B0 
770 goto720 
780 rem schermopzet 
790 poke53281,15:poke53280,7 
800 print" CCLR-HOME3Cl.b1auw3CRVS-aan3 
C34xspatie3schijf”: 

810 print ,, C35xspatie3score ,, | 

820 print” C32xspatie3topscore"j 
830 forp=lto3:print“C40xspatie3"jinext j 

840 print" C5xneer 3 C PURPER 3 SSC RVS-ui t 3 C38xs 
patie3CRVS-aan3»"s 

850 print” SfCRVS-u i t 3 C8x spat i e3 CRVS-aan 3 













Basic Min 

Een rubriek van Nico Baaijens me 


Deze keer weer een aantal korte programma’s, die al wat 
langer lagen. Het valt me op, dat de echte korte programma’s 
van 256 tekens of zelfs de Kiloliners van 1000 tekens niet zo 
vaak meer worden ingestuurd. Wordt het programmeren 
moeilijker of raakt men zo gewend aan de ruimte van de C- 
128, dat het prutsen op de vierkante Basic millimeter als 
kunstvorm verloren gaat? 

Utility 

Guy Van Dooren uit Aartselaar (Belgie) schreef een utility waar¬ 
mee een scherm-lay out naar diskette wordt geschreven en weer 
kan worden ingelezen: 

1 REM SCHRIJVEN 
10 OPEN8,8,8,”0:SCHERM 1,S,W” 

20 FORX=1T01000:A=PEEK(1023+X) 

30 PRINT 

8,CHR$(A);:NEXT:CLOSE8 
40 FORY= 1 T02000:NEXT 
50 REM INLEZEN 
60 SYS58692 

70 OPEN8,8,8,”0:SCHERM 1,S,R” 

80 FORX= 1TOI 000:GET 
8,A$:POKE1023+X,ASC(A$) 

90 NEXT:CLOSE8 

VIC-20 

Nu komt er zo waar ook nog iets binnen voor de VIC-20 en wel van 
Casper Hoogendorn uit Leusden. Zijn miniatuurtjes doen van 
alles met tekens op het scherm: vergroten, op z’n kop zetten en 
zelfs in spiegelbeeld laten zien. 

10 F0RA=6144T07169STEP8 
20 FORB=7TOOSTEP-1:D=7-B 
30 POKEA+B,PEEK(26624+A+D):NEXT:NEXT 
40 FORE=1TO1024:F=PEEK(E+6143) 

50 POKE5120+G,F:POKE5121+G,F 
60 G=G+2:NEXT 
70 POKE36867,25:POKE36869,253 

10 FORI = 1TO1024:B=PEEK(Y+32768) 

20 POKE5120+X,B:POKE5121+X,B 
30 X=X+2:Y=Y+1 :NEXT 
40 POKE36867,25:POKE36869,253 

Schietspel met joystick 

Een knap stukje Simons Basic met een leuk schietspel kreeg ik 
van Rico van Eeten uit Lichtenvoorde. Rico heeft het bewust heel 
klein gehouden met de opdracht aan de lezer om het spel zelf 
verder ’aan te kleden’ en mooier te maken. De romp van dit spel 
volgt hieronder: 

10 PRINTCHR$(154),CHR$(147):COLOURO,0:HIRES 15,0:A= 16 

20 BLOCK 147,147,173,173,1 :CIRCLE 160,160,20,20,1 
30 BLOCK 10*B,0,10*B+10,10,0:B=INT(RND(1)*31) 


:BLOCK 10*B,0,10*B+10,10,1 
40 LINE 160,160,115+A*3,110,2 
50 IF JOY=3 THEN IF A31 THEN A=A+1 
60 IF JOY=7 THEN IF A0 THEN A=A-1 
70 LINE 160,160,115+A*3,110,1 

80 IF JOY>8 THEN BLOCK 10*A,0, 10*A+10, 10,2: BLOCK 
10*A,0, 10*A+10, 10, 2 

90 IF JOY>8 AND A=B THEN T=T+1:GOTO30 
100 C=C+1 :IFC<999 THEN 40 
110 PRINT T;”PUNTEN!” 

Wubbo 

Voor de C-16 schreef Theo Kusters uit Amstelveen een miniatuur¬ 
tje dat laat zien waar Wubbo Ockels was. 

5 CLR:GRAPHIC1,1 :COLOR4,1 :COLORO,1 :COLOR1,2 
10 FORXY=1TO200: X=INT(320*RND(0)): Y=INT(200 *RND(0)): 
DRAW,X,Y:NEXT 

Blijven we nog even bij de C-16 dan is dit programmaatje van 
Erwin Rijsewijk uit Breda misschien wel aardig: 

5 A=0 

10 PRINT "(SHIFT CLR/HOME)” 

20 PRINT 7::::/::::/::::/::::/::::/::::/::::/::::” 

30 A=A+1:IFA=25 THEN GOTO 40 
35 GOTO 20 

40 FORB=1TO750:NEXTB:FORC=1TO24 
50 CHAR 1,1 ,C,”(40 SPATIES)" 

60 FORD=1TO10:NEXTD 
70 NEXTC 
80 GOTO 80 

Snellere DELETE 

Een routine om BASIC-regels te verwijderen hebben we al gehad, 
maar het miniatuurtje van Frans Luijben uit Voorhout doet het toch 
bijna vier keer sneller. 

0 PRINT CHR$(147) 

5 INPUT”BEGIN-REGELNR.”;A:IFA<OORA>63999THEN 5 
10 INPUT”EIND-REGELNR.”;B:IFB<OORB>63999 
ORB<=ATHEN 10 

15 Z=B:GOSUB100:POKE 680,Q:POKE 681,P 
20 Z=A:GOSUB100:GOTO50 

45 P=PEEK(679):Q=PEEK(678):P=P+1 :IFP=256THEN 
P=0:Q=Q+1 

50 IFP>PEEK(681)ANDQ=PEEK(680)THEN END 
55 POKE 679,P:POKE 678,Q:NR=Q*256+P 
60 PRINT CHR$(147)CHR$(17)CHR$(17)NR 
PRINT ”RUN45”CHR$(19); 

70 POKE 631,13:POKE 632,13:POKE 198,2:END 
100 Q=INT(Z/256):P=Z-Q*256:RETURN 

Digitaal geluid 

Tot slot de inzending van Jelle Dijkstra uit Haarlem. Met zijn 
miniatuurtje kan de C-64 een audio-cassettetape inlezen en 
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iatuurtjes o o 

<orte tot zeer korte programma’s. 



digitaliseren. Vervolgens wordt het gedigitaliseerde geluid ten 
gehore gebracht. Het geluid is dan nog wel herkenbaar maar meer 
ook niet. 

Dit is het principe: de geluidstrillingen worden in de cassettepoort 
omgezet in bits (nullen en enen). Daardoor wordt het volume van 
de C-64 aan- of uitgezet. Het omschakelen van het volume gaat 
steeds gepaard met een tikje. De frequentie van deze tikjes vormt 
de gedigitaliseerde geluidsbron. 

10 FORT=8192TO8202:READA:POKE T,A:NEXT 
20 PRINT ”DRUK OP ’PLAY’”:WAIT1,32,32 
30 POKE 53265,11:SYS8192 
40 DATA 120,173,13,220,74,141,24,212,76,1,32 

Een piepklein miniatuurtje om mee te spelen en verder mee te 
experimenteren komt van de twaalfjarige Michel Smekens uit 
Aalst in België: 


340 Y=(A*X*X+B*X+C)*10 

350 IF Y>240ORY<-240GO TO 400 

360 IF K=1GO TO 380 

370 PRINT #1 ,”M”,239+(X*10),Y:K=1 

380 PRINT #1 ,”J”,239+(X*T 0),Y 

400 NEXT I 

410 PRINT #1 ,”H” 

420 CLOSE2:CLOSE1 

430 OPEN3,6:FOR 1=0 TO 3:PRINT #3:NEXT l:PRINT #3, 
”Y=”;A;”X f 2 + ”;B;”X+”;C:CLOSE3 
440 END 

Misschien is het een idee om bekende logo’s van de TV eens in 
Simons BASIC te programmeren, in een miniatuurtje onder te 
brengen en zodoende voor het nageslacht te bewaren. Jan Zein 
en Rene van der Hulst uit Hoofddorp geven al vast een voorzetje 
met hun Teleac-logo in Simons BASIC: 


10 PRINT "{Shift Clr/Home}”:FOR A=1 TO 100:POKE 
53280,A:NEXT A 


Wie een 1520 plotter heeft, moet ook wat te programmeren 
hebben. Vandaar dat de 15-jarige Barry Hoogendoorn uit Andel 
voor de 64 en de VIC20 een miniatuur schreef: Assenstelsel 
genaamd. Daarmee kunnen rechte lijnen en parabolen worden 
getekend met behulp van een functie, herleid tot nul. 

10 PRINT CHR$(147);”ASSENSTELSEL” 

20 OPEN3,6:FOR 1 = 1 TO 15:PRINT #3,:NEXT l:CLOSE3 

30 OPEN1,6,1 :OPEN2,6,2 

40 PRINT #2,0 

50 PRINT #1,”D”,479,0 

60 PRINT #1,”M”,239,0 

70 PRINT #1 ,”J”,239,240 

80 PRINT #1 ,”J”,239,-240 

90 PRINT #2,1 

100 FOR 1=0 TO 479STEP10 

110 PRINT #1,”M”, 1,-240 

120 PRINT #1 ,”J”, 1,240 

150 NEXT I 

160 PRINT #1 ,”H” 

170 FOR 1=0 TO 480STEP10 
180 PRINT #1,”M”,0,240-1 
190 PRINT #1,”J”,479,240-1 
220 NEXT I 
230 PRINT #1 ,”H” 

240 CLOSE2:CLOSE1 
250 REM LIJN TEKENEN 
260 OPEN1,6,1 
270 OPEN2,6,2 
280 PRINT #2,3 

290 PRINT ” A*X f 2 + B*X+C=0” 


300 INPUT”A= 
310 INPUT”B= 
320 INPUT”C= 


A 

B 

C 


330 FOR 1=0 TO 47.9STEP.1 :X=l-24 


10 HIRES 1,0 

20 REC 100,50,100,100,1 

30 CIRCLE 150,100,50,50,1 

40 LINE 100,100,200,100,1 

50 LINE 150,50,150,150,1 

60 LINE 100,50,200,150,1 

70 LINE 100,150,200,50,1 

80 PAINT 150,100,1 

90 TEXT 97,175,”TELEAC”,2,2,20 

100 GO TO 100 

Hier knoop ik een opdracht of een uitdaging aan vast: Maak een 
miniatuurtje (Simons BASIC toegestaan) van een van de TV- 
logo’svandeEO, AVRO, KRO, NCRV, NOS, VERONICAofTROS. 
De hier gegeven volgorde is strikt willekeurig en weerspiegelt niet 
de voorkeur van de samensteller van deze rubriek. 

Leuke POKE’s 

Al dat gePOKE in de C-64 kan tot de merkwaardigste situaties 
leiden. De onderstaande zijn van Johnny Reijerink uit Enschede: 

POKE 56355,240 - Druk nu op de Ctrl-toets en de 64 weet niet 
meer waar hij het zoeken moet. 

POKE 56355,4 - De cursor loopt horizontaal over het scherm. 
POKE 56355,100 - De cursor loopt vertikaal over het scherm. 
POKE 53265,89 - De cursor is rood maar schrijft blauwe tekens. 
POKE 56355,249 - Verander van lower case naar upper case door 
de Ctrl-toets 

POKE 818,32 - Een programma SAVEn kan niet meer. 

POKE 818,237 - Nu kan het weer we’l. 

POKE 24,0 - De foutmelding FOR MULA TO O COMPLEX 
verschijnt niet meer, maar de 64 vindt ze toch nog steeds 
TO O COMPLEX. 

POKE 768,145 - Alle foutmeldingen zijn uitgeschakeld; de pro¬ 
grammeur zou dus nu niets meer fout kunnen doen. 


Johnny Reijerink voegt er als toegift nog twee juweeltjes van 
1 miniatuurtjes in Simons BASIC bij: 


49 




10HIRES 0.1.-COLOÜR 3,4 
20 FOR X=1 TO 255 STEP 10 
30 FOR Y=1 TO 255 STEP 10 
40 REC Y,X,X,Y,1 
50 NEXT X:NEXT Y 


10 PRINT”(SHIFT/CLR/HOME)” 
20 POKE53281,1 :POKE53281,0 
30 POKE53280,1 :POKE53280,0 
40 GOTO 10 


Kleine 

advertenties 

Kleine advertenties zonder com¬ 
mercieel oogmerk en zonder 
vraag of aanbod van illegaal ver¬ 
kregen software worden gratis 
geplaatst. Stuur een briefje naar 
PB 112, Blaricum. 

Deze keer bij de kleine adver¬ 
tenties een paar van het soort, 
dat we NIET willen plaatsen. 
Welke dat zijn, wordt wel dui¬ 
delijk en op deze manier stellen 
we de illegale inzenders aan de 
kaak. Weet u nog wel, we willen 
geen ruil/verkoop en dergelijke 
van gepirateerde software. De¬ 
genen, die dat wel doen, over¬ 
treden niet alleen onze regels, 
maar zijn ook strafbaar. 

Superscript 128 

Te koop i.v.m. overgang naar IBM 
PC, Superscript 128 tekstverwer¬ 
king PC-tekst 64 met podule. 
H.M.Rademaker, tel: 02940-12673 

Diverse software 

Te koop C-64 programma’s op 
disk, o.a. Print Master, The News- 
room en andere nieuwe software. 
Tel:02207-16973 (na 18.00uur, vrg. 
naar Rene) 

50 


10 HIRES 0,2 
20 A=A+4 
30 B=B+4 

40 CIRCLE 150,100,A,B,1 
50 GO TO 20 




Computerenthousiast 

Man, 38 jaar zoekt werk als field 
endineer of operator. Opl.: oriënta¬ 
tie cursus informatica, momenteel 
MEAO-informatica studerend. Tel.: 
01557-4972 

Kraak Software: 

Voor CBM-64 op tape en disk. 
Tel.:045-225449 (vragen naar 
Arno) 

Video Digitizer. 

Te koop video digitizer voor C64 
met videorecorder of camera uw 
eigen beelden digitalizeren met 
software, ook op KOALA, merk 
print &Techniek, prijs ƒ 300,-. Tel.: 
085-436625 


CBM-64 Crimi software 

Te ruil,op disk. Stuur lijst naar Mi- 
chael Dubbeldam, J.Boschstraat 
66, 4532 HN Terneu- 

zen.TeLOl 150-12249. 


Wie wil er een C-64 kopen? 

Inclusief stofhoes, cassette ree., 
met stofhoes, joystick, plm. 1000 
prg o.a.: Simons Basic en Radar 
Basic,( Ned.en Eng), handleiding, 
tips en trucks II, MCN boeken 
z.g.a.n. 1 jaar oud voor ƒ750,-. 
Tel.:043-645492. 


Commodore C-16 (1 jaar 
oud ) 

Te koop: Datarecorder (type 1531), 
140 programma’s (10 cassettes), 3 
boeken, joystickkabel. Alles voor 
ƒ500,-. Tel.: 073-415292 (vraag 
naar Stefan). 

Kopieerlust 

C-64 en C-128 lijst sturen naar 
Wiegen van Olst, Ripperdaheerd 
12, 9951 KH Winsum (Gr.) 

Commodore (Pet) 2001 

te koop, Prof.Comp. met inge¬ 
bouwde t.v.-monitor, handleiding 
+ Basic Curcus(Ned.) + spelletjes 
en werkboekjes van nr. 1 tot 6. 
Vraag prijs f 400,-. Tel.: 020- 
101231 


Ilegaal Ruilen 

Software, CBM-64 op disk. Stuur je 
lijst naar M.Verniers, Stokstraat 52, 
9140 Zele, België. Tel.:052-447656 

Mijn laatste hoop 

Gedetailleerd schema gevraagd, 
om TTL-RGB-monitor om te bou¬ 
wen naar Composiet-video. 
Tel.057-203712 

Teletron 1200 modem 

voor C-64, te ruilen tegen een MPS 
802 printer. E.Willems, Mechelses- 
teenweg 559, 1930 Zaventem.Tel. 
02-759 43 27 


C64 jatsoft 

Te koop (ƒ 1,50/25 BF) ofte ruil op 
disk /tape 900 programma’s voor 
CBM 64, ook programma’s ge¬ 
zocht voor 128, voor lijst postzegel 
bijvoegen. Bart Oosterlinck Vel- 
donkstraat 369, 3120 Tremelo 
(België). 

Mailbox Telecom Rot¬ 
terdam 

Tel: 010-4358277 & 010-4670117. 
Elke dag van 21.00 tot 07.00 uur. 
Zaterdag & Zondag 24.00 uur On¬ 
line. 


Illegaal Ruilen 

Te ruil of te koop gevraagd: de 
nieuwste programma’s voor de C- 
64. Guido Leenders, Heythuyser- 
weg 30, 6085 NH Thorn. 

Tel:04758-1921 (na 15.00 uur). 

Commodore disedrive 

Te koop, 1541 . Diskettes, casse- 
tes. Tel: 040-812590 (na 5 uur). 

Resetknoppen 

Voor de Commodore 64 computer. 
Resetknop wordt geleverd op een 
printplaat die op de cartridgepoort 
dient aangesloten te worden. Prijs 
Fl 6,—. Tel: 040-511770 (vragen 
naar Jeroen). 

Gestolen Spelletjes te ruil. 

Voor de C-64 op tape stuur je lijst 


naar M.Rüht Hofwijckstraat 17 II, 
1055 GC Amsterdam. 

C-64 te koop 

Plus Disedrive + speeddos 40 
tracks (F 49,- blacksfrer + 10 x 
sneller) + 2 joysticks + datarecor¬ 
der + software + boeken (handlei¬ 
dingen) en veel toebehoren. Alles 
in doos. Prijs F 1300,-. Tel: 03440- 
12789 (na 7 uur). 

KCS Disk Speedloader P 
004 

Te koop + handleiding ƒ 35,-. Te¬ 
vens te koop Super Huey (ƒ 20,-), 
Decathlon (ƒ15,-), Super Skramble 
( ƒ15,-), Champ/Sprite machine ( 
ƒ 20,-), Fight night (ƒ 15,-), Movie 
Maker (2 disks, ƒ 50,-). Alles origi¬ 
neel met handleiding en voor C-64. 
P.Abrahamse, Huys de Merwede 
45, 3356 AK Papendrecht. 

Wie wil gepikte C-64 soft¬ 
ware ruilen? 

Op cassette en disk. Maurice Du- 
mas, Wilhelminalaan 31, 6017 BA 
Thorn. Tel: 04756-2922. 

Commodore 64 

Te koop plus datarecorder, 2 Wico 
joysticks, veel software en stofkap. 
Prijs F 650,-. Tel: 080-564523 

Te koop 

MPS 801 Commodore MPS 801 
printer + reserve lint, Disk drive 
1541, Zenith monochroom moni¬ 
tor. Tel: 010-4823581. 

Telexontvangst op uw 
CBM 64! 

Ontvanger en telexconverter plus 
software te koop voor directe te¬ 
lexontvangst van amateurs en 
internationale persstations. F 
400,-. Tel. na 18.00 uur 02963- 
3675. 

Illegaal ruilen 

Schrijf naar Tony Belpaeme, 
Steense-Dijk 152, 8400 Oostende 
(België). 


Simon’s 

Ik zoek de handleiding van Simons 
Basic (of een kopie van deze hand¬ 
leiding), voor ongeveer ƒ10,-. 
J.J.Ydens, W.Alexanderdreef 15, 
3871 CK Hoevelaken. 

Ik wens gejatte software 
te ruilen! 

Op cass. of disk (liefst pro.). Schrijf 
naar Rudy Perard, Torhoutses- 
teenweg 2o8, 8400 Oostende 
(België) 

Te ruil aangeboden 

ZX Spectrum Plus (48 K), inclusief 
spraakmodule, Prism VTX 5000 
modem, veel software, handboe¬ 
ken en tijdschriften + TRS 80 poc¬ 
ket computer met cass. interface 
en software. Ruil tegen 1570 Dise¬ 
drive of MPS 802 Printer Tf België 
055-315974 # 


Nogmaals sorteren 

Zelf ben ik gek op snelle sorteerroutines. Maurice Zandbelt uit 
Amsterdam heeft er een die in miniatuurvorm 500 woorden in 5 
minuten sorteert. Maurice vindt de C-64 dan ook een "snelle 
jongen”. Ook heeft hij gevoel voor humor, getuige zijn benoemde 
variabele in regel 10: C=64 (!). 

10 Q=500:DIMA$(Q+1):FOR X=1 TO Q:INPUTA$(X):NEXT 
:P=1 :C=64 

20 P1=P:C=C+1:IF C=91THENFOR X=1 TO Q:PRINT 
A$(X):NEXT :END 
30 FOR X=P1 TO Q 

40 IF LEFT$(A$(X), 1)=CFIR$(C)THENZ$=A$(X):A$(X)=A$(P): 

A$(P)=Z$:P=P+1 :PRINT P 

50 NEXT:FORX=P1 TOP:FORY=XTOP:IFA$(X)>A$(Y)THEN- 
Z$=A$(X): A$(X)=A$(Y):A$(Y)=Z$ 

60 NEXT :NEXT :GO TO 20 

Tot slot 

Iets geks voor de C64: het programma Kleurenblind van W. 
Bontes uit Hellevoetsluis. Run dit simpele programma. Doe het 
licht uit en blijf enkele minuten met opengesperde ogen naar het 
centrum van het scherm kijken. Kijk wat er gebeurt als het licht 
weer aangaat. De oogarts tekent^hierbij aan dat dit experiment 
niet te vaak moet worden gedaan. 
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C GROEN ] SS S8CRVS-uit]C14xspatie]CRVS-aa 
;; n3S8 8 SC R VS-u i t ] C Bx sp a t i e 3 C R VS-aan 3 

; ; C PURPER]» "j 

860 prinf'CRVS-uitll CRVS-aan] ®SCRVS-uit] 
C7xspatie]CRVS-aan ]CGROEN]C3xspatie] 

CRVS-uit 3C14xspatie]CRVS-aan]C3xspati 
e3 CRVS-uit3 C7xspatie3 CRVS-aan3 CPURPER 
3» C RVS-u i t 3 l“j 

| S70 print"CRVS-aan3CPURPER3C3xspatie3 

8 CRVS-uit 3 C 6 xspat ie] C GROEN 3 88 C R VS-aan 3 
| CRVS-uit 3 8C14xspatie3 SCRVS-aan3 

C RVS-u i t 3 SSC 6 x spat ie3 C PURPER 3 CRVS-aan 3 
88C3x spat ie3 " ; 

# 880 print"Coranje3C4xspatie]CRVS-u i t3 

C 7xspatie 3CGROEN3 CRVS-aan 3 CRVS-uit3 
C16xspat ie]CRVS-aan 3 CRVS-uit3 C7xspat 
ie]CRVS-aan]Caranje 3 C 4 xspatie 3 "; 

| 890 forp=lto3:print"CRVS-aan] CRVS-uit3 

C2xspatie]CRVS-aan 3 CRVS-uit 3 C7xspa 
tie] CRVS-aan3 CGROEN3 CRVS-uit]C16xs 
patie3 CRVS-aan3 CRVS-uit3 C7xspatie3 
CRVS-aan 3 Coranie3 CRVS-uit 3 C2xspati 
e3CRVS-aan3 ";:next 

? 900 print"C 4x spatie3 CRVS-uit 3 C32xspatie3 

CRVS-aan 3 C 4 xspatie 3 " 

910 pokel755,32:pokel772,32 
l 920 forp=1904to2023: pokep+54272, 1 1 : poke 
p,219:next 

| 930 print"C2xneer3Cgriis 1 3 C RVS-aan 3-f 

++++44+4+++Si11ies44sof twareCHOME3" 
940 rem sprites 

I 950 poke53277,3:poke53271,1 
I 960 forp = 832to 1022:pokep,0:next 

970 poke834,4:poke837,14:poke840,4:poke 
2040,13:poke53287,0 

I 980 poke898,8:poke901,28tpoke904,62:poke 
907,127:poke910,62:poke2041,14 
I 990 poke913,28:poke916,8:pake977, 20 :poke 
980,8 

I 1000 poke53288,6:poke962,8:poke965, 20 : 

poke96B,42:poke971,85:poke974,42 
I 1010 xv=136:yv=150:poke53248,xv:poke 53 

249, yv 

1020 xs=36:ys=150:poke53250,xs:poke532 
51,ys:poke53269,3tpoke53264,0 
1 1030 forp=lto2000:next:poke54272,0 

I 1040 poke54273,0:poke54276,33 
1050 -forp = ltol00 

ij 1060 xs=x s41 i poke53250, x s i ys=ys-.5 : poke 
53251,ys:yv=yv-.5:pake53249,yv 
| 1070 poke54273,p/2:next 

I 1080 poke54276,129:print"C HOME 3 C6xneer3 
C ROOD 3 vuur poke53280,5: -f orp = 

11 o 100 :nex t 

I 1090 poke53280,7:poke2041,15 
| 1100 f orp=ltal00: ys=ys+l:pake53251,ys: 

poke54273,50-p/2:next 
1110 poke53269, l:poke54276, 128: -f orp = 12 
64tol274:pokep,32:next:-forp = lto 20 
l 00 :next 

1120 rem start spel 
1130 poke53281,13:poke53280,3 
| 1140 as=21:sc=0 

j 1150 rem start schijf 

; 1160 poke53269,1:as=as-l:ifas=0then530 

J 1170 pokel026, 160:poke55298, 14 

1180 print"CHOME]C1.blauw] CRVS-aan 3"as 
:print"CHOME3Cneer3CRVS-aan3"sc 
1190 print" CH0ME3 C2xneer3CRVS-aan3"ts 
j 1200 sr=int( 2 *rnd( 1 )) 

1210 ifsr=0thenxs=0:poke53264,0:poke53 

250, x s 

1220 ifsr=lthenxs=2B0:poke53264,2:poke 
53250,xs-255 

1230 sw=int(20*rnd(1 ))+10 

1240 ys=int(60*rnd<1))+140:poke53251,y 


1250 ifss=3thenba=int(30*rnd(l))+10:ba 
=ba/10:va=ba/46 

1260 ifss=5thenba=int<40*rnd(l))+20:ba 
=ba/10:va=ba/28 

1270 ifss = Bthenba=int(50*rnd<l)> +30:ba 
= ba/10:va=ba/ 18 

1280 poke2041,14:poke53278,0:goto150 

*»* EINDE LISTING *** 


schietschij f 





regel 

700 

164 

regel 

100 

158 

regel 

710 

48 

regel 

110 

253 

regel 

720 

6 

regel 

120 

65 

regel 

730 

103 

regel 

130 

46 

regel 

740 

1 16 

regel 

135 

143 

regel 

750 

121 

regel 

140 

203 

regel 

760 

128 

regel 

150 

131 

regel 

770 

34 

regel 

160 

153 

regel 

7B0 

227 

regel 

170 

83 

regel 

790 

98 

regel 

180 

40 

regel 

800 

14 

regel 

190 

236 

regel 

810 

148 

regel 

200 

73 

regel 

820 

135 

regel 

210 

240 

regel 

830 

153 

regel 

220 

97 

regel 

840 

53 

regel 

230 

134 

regel 

850 

86 

regel 

240 

147 

regel 

860 

218 

regel 

250 

61 

regel 

870 

4 

regel 

260 

251 

regel 

880 

36 

regel 

270 

70 

regel 

890 

126 

regel 

280 

82 

regel 

900 

129 

regel 

290 

84 

regel 

910 

45 

regel 

300 

31 

regel 

920 

190 

regel 

310 

102 

regel 

930 

69 

regel 

320 

82 

regel 

940 

185 

regel 

330 

86 

regel 

950 

46 

regel 

340 

34 

regel 

960 

194 

regel 

350 

239 

regel 

970 

196 

regel 

360 

1 1 1 

regel 

980 

6 

regel 

370 

158 

regel 

990 

123 

regel 

380 

50 

regel 

1 000 

248 

regel 

390 

21 

regel 

1010 

143 

regel 

400 

99 

regel 

1020 

174 

regel 

410 

87 

regel 

1030 

7 

regel 

420 

174 

regel 

1040 

99 

regel 

430 

59 

regel 

1050 

233 

regel 

440 

179 

regel 

1060 

144 

regel 

450 

19 

regel 

1070 

179 

regel 

460 

103 

regel 

1080 

35 

regel 

470 

240 

regel 

1090 

38 

regel 

480 

88 

regel 

1100 

174 

regel 

490 

59 

regel 

1110 

23 

regel 

500 

76 

regel 

1120 

81 

regel 

510 

219 

regel 

1 130 

92 

regel 

520 

236 

regel 

1140 

91 

regel 

530 

40 

regel 

1 150 

212 

regel 

540 

213 

regel 

1 160 

103 

regel 

550 

14 

regel 

1170 

146 

regel 

560 

104 

regel 

1180 

19 

regel 

570 

84 

regel 

1190 

203 

regel 

580 

79 

regel 

1200 

120 

regel 

590 

132 

regel 

1210 

30 

regel 

600 

26 

regel 

1220 

210 

regel 

610 

65 

regel 

1230 

184 

regel 

620 

57 

regel 

1240 

155 

regel 

630 

164 

regel 

1250 

108 

regel 

640 

243 

regel 

1260 

112 

regel 

650 

131 

regel 

1270 

116 

regel 

660 

239 

regel 

1280 

126 

regel 

670 

1 1 1 




regel 

680 

52 




regel 

690 

122 

ready. 
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Happelaar 


in de naam Happelaar zit het woord happen verstopt; het spel 
gaat dan ook over eten. De naam is overigens al eerder voor een 
Pacman variant van Philips gebruikt. Nu moeten we uw enthou¬ 
siasme iets proberen te temperen; er is namelijk een klein 
probleempje, uzelf staat als gerecht op het menu. 

Het najaar staat voor de deur en net als zovelen gaat de 
happelaar (dat bent u dus) op weg om een wintervoorraad aan te 
leggen. Naast de happelaar komen er in dit spel ook kruiskevers 
voor. De kruiskevers hebben een geheel verschillende levens¬ 
wijze, zij eten direct wat hun voor de voeten loopt, zij zullen het 
niet over een voorraad aanleggen hebben. Wel hebben deze 
dieren een uitstekende etenslust en deze wordt door uw ver¬ 
schijning alleen nog maar gestimuleerd. 

De speler gaat dus op pad om voedsel te verzamelen, in dit geval 
voedselbonen. Om bij de sappige bollen te komen moeten de 
kruiskevers dus worden ontlopen. Nadat u door middel van een 
druk op de vuurknop een voedselbol hebt opgepakt, moet u 
deze naar uw blokhut brengen. Om de smakelijke hap in de 
voorraad op te bergen moet nogmaals op de vuurknop worden 
gedrukt. De speler heeft vijf levens om zoveel mogelijk bolletjes 
te verzamelen. Helaas gaan kruiskevers harder lopen naarmate 
ze meer honger krijgen. Op niveau zes zult u dan waarschijnlijk 
ook het gevoel krijgen dat de vijfvoudig olympisch kampioen 
Carl Lewis u op de hielen zit. Wij wensen u veel succes, en de 
kevers een smakelijk eten. 

Attentie: Mocht dit spel niet goed werken, nadat u het door 
middel van het Syntax Checksum programma heeft nagekeken, 
bekijkt u dan eens, voordat u met onze listigservicetelefoonlijn 
belt (02152-65695 iedere maandag van 17 tot 21 u) het pro¬ 
gramma Rom bug weg. Mogelijke problemen kunnen mis¬ 
schien met behulp van dit programma worden opgelost! 


1 rem happelaar / cbm-64 

2 rem door rint Willem tierkstra 

3 rem uit huiz en 

4 rem p020 

5 rem 

10 data... 

4,129,32,0,129,0,1,0,120,13,255,2 
40,25,255,152 

20 data63,255,252,1,255, 128,35,255, 1 
96,31,255,248,15,255,240,16,0,8,3 
2,0,4,16,0,8 

30 data0,16,0,4,124,64,4,254,64,4,23 
8,64,21,239,80,21,131,80, 19,239, 1 
44,9,239,32 

40 datalS,239,224,1,239,0,3,255,128, 
4,254,64,9,255,32,2,254,128,2,254 
,128,1,253,0 

50 data0, 124,0,0,170,0,1,1,0,1,1,0,1 
,131,0 

60 data0, 193, 128,0, 128, 128,0, 128, 128 
,0,85,0,0,62,0,0,255,128,1,127,64 
,1,127,64 

70 data4,255,144,2,127,32,1,255,192, 
0,247, 128,7,247,240,4,247, 144,9,2 
47,200 

80 data 10, 193, 16B, 10,247, 168,2, 119,3 
2,2,127,32,2,62,32,0,8,0,7,2,2,2, 
2 , 2,2 

90 fori=lto3ipok*2040+i,14:nextipoke 

2040,13ifori*4to6ipoke2040+i,lSinext 
100 poke53280,9t poke53281,0!print"CCLR-HO 
MEI"idimpu(5),put(5),kl(3),kh(3), 
p (5) 


110 fori=1to5ipu*(i)=" 


tl 


) = 10s next 

120 fori»0to62:readai pok ei +832, ai next 
130 fori-0to62ireadaipakel+896,ainext 
140 fori-0to62:reada:pokei+960,ainext 
150 v=5324B 

160 fori=0to6ireada:pokev+39+i,ainext 
170 b»0ipu»0ilB=lis»lirB(n intro 
180 print"CCLR-HOME3 C7xneer3 C7xrechts3 
CRVS-aanlCGROENlhappelaar" 

190 print"Cneer3C7xrechts3CCYAAN3door 
r.w. tJerkitra 

200 pr int " C neer 3 C7x spat ie3f ir e - begi 
nnen 

210 a«0ifori *>v+2tov + 6step2: pokei , 80 + a 
ia=a+50inext 

220 a=25 1 f or i=v+8tov+12step2 1 pokei , 80 
+aia=a+50:next 

230 sx=25isy»130:pokev,sxipokev+l,ay 
240 •fori*=v+3tov + 7step2i pokei, 60» next 
250 fori=v+9tov+13step2i pokei, 229t next 
260 pokev+21,127 

270 p=1055+520:fori«5tolstep-l:p(i)=p 
:p =p-40■nex t 

280 i-fpeek (56320) < >1 1 lthen280 
290 1=5 

300 print"CCLR-HOME3":fori-11o5 1 pokep 
(i) ,81mextipokel024 + 360, 160iab = 5 
iax =25iay=130 

310 fori-lto3:kl(i)"60+int(rnd(l)*100 
) inex t 

320 fori“1to3ikh(1>-229-int(rnd(1)*10 

0)Inex t 

330 pakev,sx:pokev+l,sy:pokev+30,0 
340 f or i = 1 to3 s k 1 (i)=kl (i)+s:if kl <i>>2 
29thenkl<i>=60 

350 kh(i)=kh(i)-s:ifkh(i)<6@thenkh <i) 

= 229 

360 pokev+l+ <i*2),kl (i) Ipokev+7+i*2,k 
h(i)inex t 

370 ifpeek<v+30)<>0then590 
380 pr int " CHOMElsc: "pu,"1 evens«"|1, "1 
e v e1"le 

390 j-peek(56320)iifj=127ori<lllthen3 
30 

400 if J-1111hen550 

410 oni-1 16goto420,430,440,300,450, 46 
0,470,300,480,490 
420 sx=sx+7:sy=sy+7:gota500 
430 sy=sy-7 :sx=bx+7s goto500 
440 sx=sx+7igoto500 
450 sy=sy+7ssx=sx-7igoto500 
460 sy=sy-7isx=sx-7igoto500 
470 sx=sx-7igoto500 
480 sy=sy+7igoto500 
490 sy=sy-7 

500 ifsx>255thensx=255 
510 i fsx<25thensx=25 
520 ifsy>229thensy=229 
530 ifsy<60thensy=60 
540 goto330 

550 ifb-0andpeek(v+31)<>0and*x>100then 
b—1 :pokev+39,6ipokep(ab),32ipu = pu 
+5:goto330 

560 ifb=landpeek(v+31>< >0andsx< 100then 
b=0:ab=ab-li pokev+39,7ipu=pu+5 
570 ifab>0then330 
580 1e=le+1i1=1+1is=s+3igoto30@ 

590 poke53281,9:fori=lto2000:nextipoke 

53281,0:1=1—1:sx=25:sy=130:ifl >0then 
330 

600 pokev+21,0iprint"CCLR-HOME3C2xneer3 

C2xrechts3helaas,ie bent dood.Cneer3" 
610 ifpu<pu(5)then680 

620 print " C2xspatie3ie bent bij de be 
ste 5. 

630 input"C2xspatie3wat is je naam"ja 
_*igosub740ipu*(5)=a*ipu(5)=pu 


i pu (i 











Poke opdrachten 


Veelgevraagd blijven de overzichten met 
Poke, Peek en systeemopdrachten. Daar¬ 
mee kan men dan de programma’s ver¬ 
fraaien of zo maar eens op speurtocht 
gaan in het hart van de computer. J.Ver- 
kerk stuurde ons zijn verzameling. 


POKE 

uitleg 

808,239 

run/stop uit 

808,237 

run/stop weer normaal 

808,251 

run/stop, list, restore uit 

808,237 

run/stop en list normaal 

775,200 

list uit 

775,167 

list weer normaal 

774,0 

list alleen regelnummer 

22,35 

list zonder regelnummer 

2050,3 

geeft 0 bij list 

2050,64 

geeft 1 regel van de list 

792,193 

restore uit 

792,71 

restore weer normaal 

650,250 

toetsen repeterend 

650,0 

toetsen weer normaal 

649,0 

toetsenbord uitgeschakeld 

649,10 

toetsenbord weer normaal 

788,60 

cursor knippert sneller 

788,90 

cursor knippert niet meer 

778,50 

cursor weg, klok staat stil 

816,32 

prg laden niet mogelijk 

816,165 

prg laden weer mogelijk 

818,32 

prg saven niet mogelijk 

818,237 

prg saven weer mogelijk 

192,255 

runstop en restore schakelt data 
recorder motor uit 

19,64 

input zonder vraagteken 

19,0 

input weer normaal 

204,0 

get met cursor 

204,1 

get weer normaal 

120,0 

basic uitgeschakeld 

120,123 

basic weer normaal 

657,128 

commodore toets uit 

657,0 

commodore toets weer aan 

2050,8 

unnew van basic programma 

768,145 

schakelt foutmelding uit 

24,0 

geen "formula to complex” error 
meer 


SYS 

uitleg 

58692 

scherm wissen 

58726 

cursor home 

59765 

omhoog scrollen 

64738 

reset computer 

64760 

reset als new 

58402 

flits commodore logo 




Gebruikersgroepen 


De VCGN (070-971851) is de oudste Commodore gebruikersvereniging en heeft 
iedere laatste zaterdag van de maand in het Lodewijk Makeblijde lyceum in Rijswijk 
een grote bijeenkomst. Inlichtingen over de vele afdelingen kunt u krijgen via het 
secretariaat: Haagweg 155, 2281 AH Rijswijk, 070-950779. 

Verder afdelingen : Zeeland 01184-14789, West-Brabant 01640-42404, Midden- 
Brabant 01612-4242, Zuid-ümburg 04490-19946, Zuid-Holland 078-135739. 

PET Benelux heeft bijeenkomsten in Zeist (1 e zaterdag), Nijmegen (2e zaterdag) en 
Haaksbergen (3e zaterdag), (lnl.05759-2211). 


De HCC Commodore gebruikersgroep heet Compet, 03404-59599. 

HOT NEWS van SCN uit Amsterdam (03450-16051) heeft haar maandelijkse 
bijeenkomst in de Meervaart op de 2e zaterdag van de maand en ook activiteiten in 
Zwolle (038-548459), Midden Nederland (03453-1375) en Deventer (05700-50758). 

Voor C-128 gebruikers is er een initiatief voor een GG, inl. 02997-1479, Zuideinde 1, 
1843 JL Grootschermer. 

In Arnhem zit een Commodore-club, waar men clubavonden op dinsdag iedere 
twee weken organiseert en ook cursussen geeft. Inl. Hofsingel 259 te 6834 GH Velp, 
tel. 085-647782. 

De Dutch PC Club organiseert iedere 2 zaterdag eeen bijeenkomst voor alle merken 
in de Kajuit, Hazekampseweg 36 in Nijmegen, Inl. Spechtstr. 32,4043 LS Opheus- 
den. 

Den Helder heeft de Commodore CG, te bereiken via Postbus 2068,1780 BC te Den 
Helder of telefonisch via 02230-31430. 

In Groningen is er elke 2e zaterdag van de maand een gebruikersbijeenkomst in de 
Beijumkorf, Jaltadadreff te Groningen, aanvang 10.30 u. 

In Noordwijk zit een C-64/128 gebruikersgroep, die iedere Ie donderdag een 
bijeenkomst heeft. Inlichtingen A. vd Klaauw @ 01719-16720. 

Oss heeft de vereniging ACC, voor Oost-Brabant en de Betuwe, via postbus 215 of 
telefoon 04120-42054/37649 bereikbaar. Bijeenkomsten iedere derde zaterdag in 
”de Pas” te Heesch. 

In Uden zit de CCU, met elke eerste donderdag om 20.00 u een bijeenkomst in de 
schouw. 04132-64239 

Voor de Amiga is er ook een club, te breiken via Postbus 41138, 1009 EC te 
Amsterdam. Inl. 020-931191. 

BELGIE 

De CCCB is een van de clubs uit Belgie, met afdelingen in Antwerpen, Limburg, 
West-Vlaanderen inl. Bindstr. 19, te 2600 Berchem Antwerpen. Lid worden door 
storting 500 fr op 405-5092171-90 tnv. CCCBA. 

Ook de HCC België heeft bijeenkomsten iedere 2e en 4e maandag op de 
Ottergemse steenweg-Zuid 705 te Gent (03-6468961). 

In Oostende is er de Commodore-Ciub Oostende, Raversijdestraat 48, B 8400 
Oostende 059-805191. 

In Borgerhout is er een C-64 gebruikersgroep, die de 2e en 4e zaterdag van de 
maand om 19.30 u bijeenkomt de ”de Sportschuur”. 
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happelaar 


640 

650 


660 

670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 


ttt 


fork=lto5i fori=ktD5 

if pu ik Kpu ( j >thenc=pu(J > ic$>pu$(i 

> :pu(i )=pu<k): put (j)=puê(k) iputlk 

)=c$ipu< k)=c 

nextin ex t 

print"C CLR —HOME 1 " 

fori»lto5iprInttab(2)pu$(1) E pu(i) 
iprintmBxt 

print"C2xBpatie3nog eins? 

getafi i-fa*=" "then700 

ifa*“"i"thanpok«v+39,7igotol70 

ifa*«"n"thenend 

goto700 

iflen<a*>>9then770 
i-flen (a*) »9thenreturn 
fori-len(e*)to9n«»st+" " 
print“[2xspati»3niet meer 
etters." 

input"[2xspatielwat is i 
*igoto740 
EINDE LIBTING *** 


nextireturn 
dan 9 1 


I b naam"ja 


r eg 

2 

132 

r eg 

3 

84 

r eg 

4 

113 

r eg 

5 

143 

reg 

10 

106 

r eg 

20 

190 

reg 

30 

141 

reg 

40 

186 

reg 

50 

244 

reg 

60 

17 

reg 

70 

154 

reg 

80 

58 

reg 

90 

30 

reg 

100 

202 

reg 

110 

255 

reg 

120 

68 

reg 

130 

78 

reg 

140 

70 

reg 

150 

14 

reg 

160 

225 

reg 

170 

88 

reg 

180 

1 12 

reg 

190 

41 

reg 

200 

101 

reg 

210 

146 

reg 

220 

252 

reg 

230 

200 

reg 

240 

205 

reg 

250 

55 

reg 

260 

192 

reg 

270 

208 

reg 

280 

214 


reg 

290 

51 

reg 

620 

167 

reg 

300 

168 

reg 

630 

91 

reg 

310 

237 

reg 

640 

99 

reg 

320 

33 

reg 

650 

156 

reg 

330 

46 

reg 

660 

62 

reg 

340 

3 

reg 

670 

112 

reg 

350 

56 

reg 

680 

180 

reg 

360 

53 

reg 

690 

9 

reg 

370 

218 

reg 

700 

100 

reg 

380 

220 

reg 

710 

152 

reg 

390 

231 

reg 

720 

91 

reg 

400 

91 

reg 

730 

32 

reg 

410 

37 

reg 

740 

51 

reg 

420 

102 

reg 

750 

36 

reg 

430 

103 

reg 

760 

250 

reg 

440 

65 

reg 

770 

147 

reg 

450 

103 

reg 

780 

251 

reg 

460 

104 




reg 

470 

66 




reg 

480 

67 

ready. 


reg 

490 

236 




reg 

500 

35 




reg 

510 

187 




reg 

520 

39 




reg 

530 

187 




reg 

540 

31 




reg 

550 

100 




reg 

560 

86 




reg 

570 

44 




reg 

580 

211 




reg 

590 

241 




reg 

600 

83 




reg 

610 

83 






The elementary Commodore 128 
- met Basic 7.0 - 


De onmisbare handleiding voor Uw Commodore-128, 
door William B. Sanders. 

In prijs verlaagd , 

door goedkopere import: 1111 J OOj— 


Bestellen kan alleen bij vooruitbetaling door overmaken van 
ƒ 35,- op giro 3157656 Infolist Huizen met vermelding van: 
The Elementary C-128. Na ontvangst van Uw overmaking sturen 
wij U het boek op. 

Ook in de betere computerwinkel. 


INFOLIST 

Postbus 1047, 1270 BA Huizen, tel.:02152-62343 
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Diamanteniacht 


Er zijn mensen die steevast verdwalen in een onbekende stad, of 
zich uren rot lopen te zoeken in een groot winkelcentrum. Wie 
zich in deze schets weet te herkennen gaat zware tijden 
tegemoet. 

In dit spel, dat met twee personen gespeeld wordt, dient een 
diamant te worden opgespoord. Beide spelers bevinden zich in 
een doolhof en verplaatsen zich met behulp van een helikopter. 
Het doolhof wordt voor elk spel door de computer opnieuw 
ontworpen, hierdoor blijft het een doolhofspel en vervalt het niet 
tot een variant op het overbekende memory spel. Men kan zelf 
de grootte van het doolhof bepalen, echter hoe groter het 
doolhof hoe langer de computer nodig heeft om het te ontwer¬ 
pen. Dit kan dus varieëren van enkele seconden tot enige 
minuten. 

Wat ons werkelijk verbaasde was, dat de programmeur het voor 
elkaar heeft gekregen om in dit relatief erg korte programma, 
gebruik te maken van het ’split-screen’ effekt. Anders gezegd, 
op de monitor krijgt u twee vensters te zien, elke speler heeft dus 
een eigen schermpje. Hierdoor wordt het mogelijk dat speler 1 
bovenin het doolhof ronddwaalt, terwijl speler 2 rechtsonderin 
wanhopig op zoek is naar de diamant. 

We hopen van harte dat het aantal families, die in de hitte van de 
onderlinge strijd uit elkaar zal scheuren, beperkt blijft. 





rem d i amantenJacht / cbm-64 
rem door harrie van lammeren 
rem uit vogelenzang 
rem p016 


dimpxX <2500) , pyX <2500) , hX < 24,24 ) , 
m 7. <24,24,2,2) ,ra$(f, 1, 1, 1) i v=5324 
8:s=54272 

fork=0tol:forl=0tol«form=0tol:for 
n=0tol«readra* < k ,1,m,n)s nex tn,m, 1 

ïï k 

input“CCLR-HOME3 CRVB-uit 3 CWITlgro 
otte doolhof <2-24)"jg*ig=va1<g*) 
t if <g<2)or<g>24)then30 
deffnr(r)«int(rnd(1)Ir)+tipokev+4 
2,7s pokev + 43, 14ipoke2043, 13 
poke2044, 13a pokev+ó, 92 i pokev + 8,25 
2ipokev+7,123ipokev+9,123s pokev+1 
6 , 0 

poksv+32,ll!paktv+33,0iprint"[neer] 


wacht even...,"iq=peek < v+31)*peek 
< v + 31) 

70fork«*0to62i raad ai poke832+k , ai poke 
B96+k,ainexti poke896,7 1 pokeB98,22 
4 

80 pokes + 24,79 1 pok es, 2001 pokes+l,0ipoke 
s+2,0ipoke»+3,lipokes+6,251 

<? 0 pokes + 23,241«pokes + 22,40ifork=960 
tol 022 ireadaipokak,atnextib=lie=l 
i n = l 

100 i“fnr <g) ipxX<l)=i«pyX < 1 > =1« hX <i, 1 
)=lip=13ima<l)»152«ma<2)=312tmi<l 
) =32 

H0b*<0)="CRVS-aan3 ■ J -T- L -r- L T J -r- J -r J -r-‘-t- L -i- L 
-rCneer 3C 18x1 inks3“ smi<2)=192idy<l 
)=1■dx<2>=1 

120 b* <0) = b* <0) +" CRVS-aan3-r- L -r- J -T J -T-‘-r J -T 
■ dy(4 )=-1 

130 b* < 1 )=“ CRVS-aan3 J -r- 1 -r J -rCRVS-uit3C&x«pa 
tie]tRVS-aan3 J -r J -T J -Ttneer3ClSxl inks3 " 

Isx <1)=92 1 sx <2> =252 

140 b* < 1) =b* < 1) + "CRVS-aan3T J -r J "r- l -CRVS-uit3 
[&xspatie3tRVS-aan3 neer3C18xli 

nks3"ssy<l)=123!sy<2)=123 
150 l*<0)="CRVS-aan3 J -r- 1 -r J -rCneBr3C6xl in ka 3 
-r- L T- t T- L Cneer 3C6xlinks3" il*<l ) = " CRVS-ui 
t3C6xspatie3Cneer3C6xlinkB3C6xspatie3 
Cneer3C6xlinka3" 

160fork=0toliforl=lto3ic*<k)=c*<k)+b 
*<k)im*<k)=m*<k)+l*<k)inextir*<k) 

=m* < k) 

170o*<k)=c*<k)ir*<k)=r*<k>+"C12xlinka3" 
im*<k)=m*<k)+"C12xrechts3C6xop3" 
180nextige*<0)="CWIT3CRVS-uit3gewonn 
en! !tl 0x1inks3"ige»<1)=“CRVS-aan3 
CWIT3 gewonnen!!C 10 x 1 inkal" 

190 s*=" CRVS-aan3 C40xspatie 3"•t» = "CHOME3 
C14xrechts3C RVS-aan 3CgriJs 13tiid 
C2xspatie3" 

200an=lsfork=btoeiifpxX<k)=0then240 
210 if <fnr(4)=1)and(n>5)thenn=n + lila» 
nipxX<n)=pxX<k> spyX<n)=pyX<k)«goto 
240 

220gosub600!if(fnr(4)=l)and(a>0)then 
gosub600 

230 if<fnr<3)=l)and<a>0)thengosub600 
240 nextïb = e+lie=n«if an = 0 then200 
250 ux=pxXUa> iuy=py7. <la) ifork = lto 2 «x 

<k)=isy<k)“i!nextipokea+4,64«gosub 

4.80 

260 print"tCLR-HOME3Egriia 13"»*iifor 

k=ltolB;print"CRVS-aan3 C18xrechts3 
C2xspatie3C18xrechts3 “j 
270 nextiprints*s*s*s*s*"Clinks3"s*ji 
poke2023,160tpoke56295,11 
280 print "CHOME3Cbruin3 11 1 ix = iiy = lsfor 
k = lto2«ti*“" 000000"igosub570mext 
ipokes+4,65 

290 fork = lto2iJ=peek <56322-k)ipv = v + 4+ 

k + k 

300 on(iand 13)goto, , , ,460,460,310,,46 
0,460,330,,350,370,460 
310 ifsx <k)=ma<k)thensx < k)=mi< k)idx = l 
s dy = 0« goto390 

320 sx<k)=sx<k)+12igoto430 
330 ifsx <k)=mi< k)thensx<k)=ma<k)idx=- 
1i dy=0l goto390 
340 sx<k)=sx<k)-12■goto430 
350 ifsy<k)=183thensy<k)=63idy=lidx=0 
igoto390 

I 360 sy<k)=sy<k)+12igoto420 
370 ifsy <k)=63thansy <k)=183idy=-lidx = 

0sgoto390 I 

380 sy<k)=sy<k)-12igoto420 
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128 Software, aangepast en echt 


Omdat er nogal wat verwarring bestaat tussen de 128 soft¬ 
ware, die speciaal voor die machine is geschreven en de 
software, die zowel op de 64 als de 128 werkt, geven we 
hieronder een lijstje van speciale 128 software. Misschien zijn 
ze nog niet gemakkelijk verkrijgbaar, maar de 128 bezitters 
hebben dan tenminste enig houvast. 


Productieve/serieuze software 


Abacus 


Activision, Ine. 


Batteries Included 


Cardco, Ine. 


Clockwork Computers 


CMS Software Systems 

Commodore Business 
Machines 

Digital Solutions 


Epyx 

Grolier Electronic 
Hesware 
Kamasoft 
Michaelsoft 
Pro-Line Software 


Chartpak 
Cadpak 
Creative Writer 
Creative Filer 
Creative Calc 
Homepack 

PaperClip (doublepack) 

PaperClip with SpellPack 
The Consulant 128 (doublepack) 

Personal Time Manager 
Personal Accountant 
Personal Inventory 

Cll Bottom Liner 

CCI Property Rental 

CCI Mortgage Management 

CCI Merchandiser Plus (MER + C) 

CMS Accounting System 
Inventory Manager 

Jane 

Perfect Writer 
Perfect Filer 

Paperback Writer 128 
Paperback Planner 128 
Paperback Filer 128 

Multiplan 

Information Connection 
Ghost Writer 128 
Out-Think 
dfile 128 

Word Pro 128 

Word Pro 128 Advanced 

Profile 128 


Professional Software Fleet System 2 
Progressive Peripherals/ SuperScript 


Software 

Rochester Electronics 
Video 

Softsync Ine. 


Solid State 

T/Maker Company 
Timeworks 


Sideways 


Superbase 
Bobsterm Pro 

Split 


The Personal Accountant 
Trio 

Desk Manager 

Vizawrite Classic 
Vizastar 128 
T/Maker 
WordWriter 128 
SwiftCalc 128 
Data Manager 

Sylvia Porter’s Financial Planner 
Partner 128 


Utilities-programmeertalen 


Abacus Software 


Access Software 

Aquarian Software 

Cardo, Ine. 

Covox 

Hughes Associates 

Kingwood Software 
Associates 

M/M Software 
Megasoft 

Melodian Ine. 


Nu-Age Software 
Skyles Electric Works 


Basic Compiler 128 
Super C Compiler 
Super Pascal Compiler 
Xrex 

MACH 128 

Development System 128 
Matrix 

Total Software Development System 
Freeze Frame 
Voice Master 

Freedom Assembler 
Freedom Editor 

REX 

Cl 28 Forth 
128 BBS 
Swifterm 

ConcertMaster 128 
RhythmMaster 128 
ScoreMaster 128 
Melodian Music Keyboard 
Programmer’s Tool Kit 

REBEL Assembler/Editor 
Cl 28 Flash! 

Quicksilver 128 
Blitz 128 


Educatieve software 


Cardco 

Commodore Business 
Machines, Ine. 

Gessler 

MECC 


Rich Rediker 


Scholastic 


Very First 

Complete Course in BASIC 

Word Attack 
Hangman 

Odell Lake 
Spelling Bee 
Expeditions 

The Friendly Computer 
Path Tactics 

Adventure with Fractions 
Pre-Reading 
The Market Place 
The Cjlass Computer 

Data Base Plus 
Attandance Plus 
Report Cards Plus 
Scheduling Plus 

Bank Street Writer 


Recreatief/spelletjes 

Commodore Business Micro Illustrator 128 
Machines 

Free-Spirit Software, Ine. The Great War 
Infocom Trilogy 
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x**x (k) iy-y(k) i ifmX<x,y,dx+l,dy+l> 

=lthenx=x+dx«y=y+dy 

pokev+21 , 0i 0 osub57© 3 i f(ux“x > and(u 

y = y)th en510 

x(k)=x:y(k)=y«ifdx<>0then430 
pokepv+l,sy(k)r goto460 
ifk=lthenpokepv,sx (1) s goto44@ 
ifsx (2) >255thenpokev+16, lóspokepv 
,ax (2)and255igoto460 
pokepv,sx(2)ipokev+16,0 
pDküv+21,24inextip = p-kl+(p“14) + (p = 
14) ipoke2043,p s poka2©44,p 
i-fpeek (v+31)»0then290 
k=peBk(v+31)/Bik»k+(k»3)*fnr(2)ik 
“3-k i if k-3then290 

pokes+4, 128ipokeB+l, 15igasub570ifor 
l°ltol00i pokev+44-k,1ipokev+44-k, 

0 i n e x t 

pv = v + 4 + k + ki forl = lta5i x = f nr (g) i y=-fn 
r (g)igosub570inBKt!x=uxiy=uyigasub 
570 

pokes+23,241ipokepv+l,123spakepv, 
mi (k)+40:pokev + 16,peek(v+16)and(< 
3-k)*8) 

poke2042+k, 15ipoke2045-k, 13 
pokev+41+k,1ipokev+21,24:tori«894 


<1>, y(1) )=lian=0ireturn 

input"CCLR-HOME3 CRVS-uitIdool hof 

in beeld (J/n)"|Jn*i Jn*=laft*Un* 

i 1) i ifin*<>"j " thenreturn 

pr int " CCLR-HOME 3 " j!fark=ltogjfarl 

= 1 tog 

print"CbruinD CRVS-aan3"ra* <mX( 1 , k 
, 0, 1) , m% (1 , k, 1,0) , m% (1 , k , 2, 1 > , <n% < 

1 , k,1,2))s 

nextiprintinex1 1 poke1023+i , 19ipoke 

983+ux+uy*40,4 

i-fpeek (197 ) «64t hen720 

return 

data" " , " " , " “ , " r " , " "," I , " 


r «turn 

data" "," "," " , " r " , " ","I"," L "," 

k " , " -i t" -i ,"4 

,255,255 

data255,,,,,24,,,126,,,211,,1,82, 
128,1,82,128,1,82,128,1,126,128,0 
,255,,0 

datal 26,,,129,,1,195,128,,,,,,,,, 

.,,..,,,,,,48,,,4B,,94,14,2 

4,96,,24 




, 254, , 

dat a254, , , 124,,24, 124,,96 
56, 12,, 16,,, 146,,, 130,, 1, 
31,0 


*** EINDE LISTING *** 


d i «manteniacht 


'~ToM fó' 


to958ireadaipokel,a«nexttprint"C3xnee 

r3C4xrechts]"| 

poke2042+k,14ipokes+4,65if orw=1to 
5inextipoke2042+k,15jpokes+l,fnr< 

55)+100 

rv=rv+l+(rv”l)+(rv»l)iprintgellrv 

) ) i i-fpeek (197) “64then540 

pokev+21,0ipokes+4,64 ipokel9B,0igosub 

680:pokel98,0!run 

printttti*ipoke211,k»20-19:poke21 
4,1isyS58732 

ct = ct (m7. (x , y, 1,0) > :m*=u$ («iX (x , y, 0 
, 1) ) ir*»r*UX(x,y,2, 1) ) io»“o*(m7. < 
x , y,1,2)> 

print"[bruin]"c*m$r*olj:return 

**0in*n+liforl-lto4iK(l)»pxX<k)+d 

x (1 ) : y (1 ) =py'/. (k) +dy (1 ) 

i-f (x <1 ) =0) or (y (1 ) =0) or (x (1) >g)or< 

y <1> >g)then640 

i-f h - /. <x <1 ) , y <1 ) ) = 1 then640 

a = a+1s m(a)=1 

nextsifa=Othenreturn 

1 = m(f nr(a)) 

mX(x <1),y <1),1-dx(1), l-dy(l))=lim 
X <px X < k) ,pyX (k),dx (1)+1,dy <1)+l) = 

px X(n)®x (1 ) :pyX(n)=y(l )ila°nihX(x 


regel 

1 

34 

regel 

2 

180 

regel 

3 

193 

regel 

4 

118 

regel 

5 

143 

regel 

10 

9 

regel 

20 

177 

regel 

30 

61 

regel 

40 

139 

regel 

50 

135 

regel 

60 

121 

regel 

70 

59 

regel 

80 

85 

regel 

90 

177 

regel 

100 

44 

regel 

1 10 

158 

regel 

120 

232 

regel 

130 

56 

regel 

140 

244 

regel 

150 

251 

regel 

160 

101 

regel 

170 

212 

regel 

180 

125 

regel 

190 

164 

regel 

200 

162 

regel 

210 

227 

regel 

220 

132 

regel 

230 

38 

regel 

240 

190 

regel 

250 

3 

regel 

260 

39 

regel 

270 

0 

regel 

280 

75 


regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel ( 
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regel 

620 

132 

regel 

730 

142 

regel 

630 

38 

regel 

740 

232 

regel 

640 

15? 

regel 

750 

133 

regel 

650 

37 

regel 

760 

112 

regel 

660 

160 

regel 

770 

174 

regel 

670 

142 

regel 

780 

190 

regel 

680 

125 

regel 

790 

89 

regel 

690 

84 

regel 

800 

232 

regel 

700 

75 




regel 

710 

197 




regel 

720 

155 

ready. 



Slow-Print j 


Een goede programmeur laat zijn programma de gebruiker 
aanwijzingen over de werking ervan geven. Niets is natuurlijk 
simpeler dan een gebruiksaanwijzing op het scherm af te 
drukken; een paar printopdrachten en men is klaar. 

Met een paar programmaregels extra zou zoiets ook veel fraaier 
kunnen. De Slow-Print-routine is uitstekend geschikt voor dit 
doel. 


10 

rem ook in te voegen 

i n 

e 

i gen 

P r 

o 


gramma’s, alleen reg 

el 200 

-210 

i s 



dan nodig 






20 

rem denk wel om de v 

aria 

b 

el en 

di 

e 


de subroutine gebru 

i kt ! 





30 

rem - begin progra 

mma 

- 

— 



40 

print"CCLR-H0ME3";:t 

y $ = " 

C 

H0ME3 

" i 

f or 


tl=lto25:tyt=tyt+"Cn 

eer 3 

II 

s tx * = 

tx 

$ 


+"Crechts]“inext 






50 

poks53280,0ï poke5328 

1,0 





60 

rem - demootje en 

uitl 

e 

g- 



70 

(orl c 0to9sreadkl,ty. 

tai: 

y 

osub200 

: 


next:pr int"CGROEN]"; 

: end 





80 

rem - tekst data - 

— 





90 

data7,2,"r- 

— 

— 


— 

— 


100 data7,3,"I'slow-print’ door jan p 
ij nackerI" 

110 data7,4, " - - 


120 data5,8,"in ta* do tekst" 

130 data2,10,"in ty de y-positie (1-2 
5) “ 

140 datal5, 12, " in kl de kleur (0-15)" 
150 data4,14, "en dan gosub 200 " 

160 data13, 17 , "de tekst wordt automat 
isch gecentreerd" 

170 datal0,20, 11 (c) E2xspatie3commodore 
-info" 

180 datal , 21 , "-* 

190 rem - subroutine 'slow-print’ - 


s 1 ow- 

print 





rsgel 

10 

9 

regel 

160 

249 

regel 

20 

128 

regel 

170 

116 

regel 

30 

168 

regel 

180 

146 

regel 

40 

232 

regel 

190 

250 

regel 

50 

37 

regel 

200 

70 

regel 

60 

81 

regel 

210 

81 

regel 

70 

225 

regel 

220 

224 

regel 

80 

66 

regel 

230 

143 

regel 

90 

38 

regel 

240 

38 

regel 

100 

52 

regel 

250 

51 

regel 

1 10 

52 

regel 

260 

204 

regel 

120 

240 

regel 

270 

44 

regel 

130 

56 



regel 

140 

54 

ready 



regel 

150 

48 

■ 



Pauze-List 


Het kan erg hinderlijk zijn als een listing, die men wil bekijken, als 
een intercitytrein met vertraging over het scherm raast. Om een 
listing zonder de hulp van een uitbreidingsmodule goed te 
kunnen bekijken, is het gebruik van de run/stop- toets onvermij¬ 
delijk. Dit heeft dan weer tot gevolg dat de listopdracht vele 
malen opnieuw moet worden gebruikt. 

De ontbrekende schakel tussen een dure module en de run- 
stop-toets, wordt gevormd door het programma Pauze-List. Na 
het runnen van deze utility, kunt u een listing op het scherm op 
ieder gewenst moment even ’bevriezen’, door de funktietoets F7 
in te drukken. 


1 rem pauze-liot / cbm-64 

2 rem door jan piinacker 

3 rem uit breezand 

4 rem 391 

5 rem 

10 rem machinetaal *C040 (49216) - * 

C056 (49238) 

20 rem dit programma is ook samen te 
gebruiken met het programma voor 
de 

30 rem cursor-positie ’@x,y' 

40 rem een andere toets als f7 is oo 
k mogelijk, poke in *c04f (49231) 

de juiste 

50 rem waarde uit lokatie $c5 (197) 

die hoort bij de gewenste toets. 

60 rem b.vi poke49231,60 als u de sp 
atiebalk als toets wil. 

70 fort=0to21ireadaipoke49216 + t,ai neut 

80 sys49216 

90 rem - machinetaal data - 

100 datal62,75,160,192,142,6,3,140,7, 
3,96,72,165,197,201,3,240,250,104 
,76,26 
110 datal67 


200 poke646,klita=len(ta*)itx=(40-ta> 

/2:printleft* <ty»,ty)left* <tx»,tx 
> J 

210 fortl“ltotaiprintmid*(ta*,tl,1)"CRVS- 
aan 3 CRVS-uit3Clinks3"!ifortw*»lto 
401nexttw,tl 
220 print" "jireturn 
230 rem 

240 rem slow-print / cbm-64 
250 rem door jan piinacker 
260 rem uit breezand 
270 rem 391 

*** EINDE LISTING **# 


*** EINDE LISTING *** 


pauz e-1ist 


regel 

1 

21 

regel 

50 

167 

regel 

2 

51 

regel 

60 

122 

regel 

3 

204 

regel 

70 

190 

regel 

4 

44 

regel 

80 

164 

regel 

5 

143 

regel 

90 

206 

regel 

10 

130 

regel 

100 

156 

regel 

20 

128 

regel 

110 

33 

regel 

30 

34 


regel 

40 

141 

ready. 
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Rom bug wee; 


Niet elke Commodore-64 is hetzelfde. Men moet wel heel kippig 
zijn om niet het verschil te zien tussen het nieuwe model en de 
overbekende oude kast; belangrijker is echter dat de binnenkant 
van deze machines ook niet altijd identiek zijn. 

De oudere modellen waar er duizenden van in omloop zijn 
hebben namelijk een foutje in de Read Only Memory chip. In 
deze ROM chip zit de gegevensbibliotheek van de computer 
ingebakken. Deze gegevens gaan in tegenstelling tot een ingela¬ 
den programma niet verloren als u de computer uitzet. Vanwege 
een kleine fout in de ROM, programmeurs spreken van een 
’bug’, kan het komen dat een programma niet goed werkt. In dit 
nummer staan bijvoorbeeld de programma’s Wegwezen en 
Happelaar. Deze programma’s zullen problemen opleveren met 
een verouderde 64. 

Met het programma Rom Bug Weg kan men testen of men een 
oud of nieuw model bezit en de fout indien aanwezig soft¬ 
warematig corrigeren. Dat laatste houdt in dat nu ook op de 
oudere computers de meeste programma’s die problemen 
gaven goed zullen werken. Zodra u echter de Run/Stop en 
Restore toetsen tegelijk indrukt, uw computer Reset, of aan- en 
uitschakeld, werkt deze correctie niet meer en zult u het 
programma Rom bug weg opnieuw moeten inlezen en runnen. 
Voor de programmeurs onder u het volgende. De bug zit hem in 
het poken van een karakter naar het schermgeheugen, u moet 
hiernaast ook een kleur mee poken. Als u dit niet doet dan zal op 
de oudere computers het karakter in de achtergrondkleur 
worden weergegeven. Op een lichtblauwe achtergrond zal een 
letter dus lichtblauw worden weergegeven, hetgeen de lees¬ 
baarheid niet ten goede komt. Als de achtergrondkleur naar wit 
zal worden gewijzigd is het karakter natuurlijk wel te zien, echter 
zal het teken de eerstvolgende keer dat het weer gepoked wordt 
in de nieuwe achtergrondkleur worden gedaan, in dit geval wit. 
De enige afdoende oplossing is dus om een kleur met het 
karakter mee te poken. Dus niet enkel POKE 1024,1, maar 
POKE 1024,1 :POKE 55296,14 om een lichtblauwe letter A in de 
linkerbovenhoek van het scherm te zetten. Als men een pro¬ 
gramma schrijft let hier dan even op, het zal de gebruikers van 
uw software heel wat grijze haren kunnen schelen. 


170 data 208,249,230, 
180 data 0,208,241,16 
190 data 228,169,2,14 
200 data 41,3,133,1,1 
210 data 114,169,32,1 
220 data 249,230,114, 
230 data 208,241,173, 
240 data 173,171,3,13 
*** EINDE LISTING *** 


rom bug weg 




regel 

1 

232 

regel 

120 

177 

regel 

2 

51 

regel 

130 

173 

regel 

3 

96 

regel 

140 

180 

regel 

4 

143 

regel 

150 

87 

regel 

10 

225 

regel 

160 

173 

regel 

13 

234 

regel 

170 

180 

regel 

16 

244 

regel 

180 

86 

regel 

17 

205 

regel 

190 

184 

regel 

18 

54 

regel 

200 

119 

regel 

20 

1 10 

regel 

210 

129 

regel 

30 

26 

regel 

220 

82 

regel 

40 

145 

regel 

230 

78 

regel 

50 

128 

regel 

240 

98 

regel 

100 

79 




regel 

110 

61 

ready 

■ 



Wegwezen 


Heel simpel, maar verslavend. Zo laat zich het spel wegwezen in 
het kort omschrijven. De speler hoeft niets anders te doen dan 
het balletje, van onderaan het scherm naar boven te sturen. 
Natuurlijk wel nog even alle hindernissen die u onderweg 
tegenkomt omzeilen. Na drie balletjes is de score bekend; het 
hoogste puntenaantal krijgt op het scherm een eervolle vermel¬ 
ding. 

Attentie: Mocht dit spel, nadat u het door middel van het Syntax 
Checksum programma heeft nagekeken niet goed werken, 
bekijkt u dan eens, voordat u met onze listigservicetelefoonlijn 
belt, het programma Rom bug weg. Mogelijke problemen 
kunnen misschien met behulp van dit programma worden 
opgelost! 


1 

rem bug weg / cbm-64 

1 

rem wegwezen / cbm-64 

2 

rem door ronald willemsen 

2 

rem door robert hoogstra 

3 

rem uit bussum 

3 

rem uit peize 

4 

rem 

4 

rem 403 

10 

ifpeek(585BB)-2thenprint"CCLR-HOME3 

5 

rem 


u heeft nieuwe rom"iend 

10 

c“0s f «1 ■ y**40 

15 

ifpeek <58588) < >2t henpr i nt " C CLR-HOME 3 
u heeft een oude rom, deze bevat 

20 

printchr*(147)e goeub200ipoke2004, 

81 


een "j 

30 

y«=y + 2«forq = ltoyiw»int <759*rnd tl)) 

16 

print"C3xspat 1e1k1e1ne fout, welk 
e nu softwarematigC5xspat ie 1wordt 

40 

pokew+1104, 102:nextqt x=20@4sz“200 

4 


opgelost" 

50 

forq-lto5ipokeq+1281,102:next 

17 

print" C7xneerl [8xrecht»K<druk ee 

60 

pokex,32 


n toets))" 

70 

ifpeek <z>< >102thenpokez, SI :gotolO 

18 

getatiifa*="" then 18 


0 

20 

forx«82Bto931 

80 

f “f+ 1 i iff“4thenf=>3:gotol60 

30 

readas pokex,ainext 

90 

y=y-2 j goto20 

40 

sys(828) 

100 

c“c+lix=z: ifc“500thenf =f-1 

50 

end 

110 

ifpeek <56320 )« 123thenz=z-1 

1 00 

daita 165, 1 13, 141,170, 3, 165, 1 14 

120 

ifpeek(56320)=119thenz=z+l 

110 

data 141,171,3 

130 

forq*ltol5inext«printchr*(19)| 

1 1 20 

data 160,0,169,0,133,113,169,160 

140 

printspc(6)(ciz-z-401ifz>1104th»n 

130 

data 133,114,177,113,145,113,200 


60 

140 

data 208,249,230,114,165,114,201 

150 

goto20 

1 50 

data 192,208,241,160,0,169,224 

160 

i-f c >hth»nh"c 

1 60 

data 133,114,177,113,145,113,200 

170 

gosub200ipoke198,0 


BI 
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a€ 


180 d=peek<56320)and 16 1 ifd<>0thanl80 
190 gotol0 

200 printchr*<19>;"scores“;c;tab(13) j 
210 pr int "record s";h;1ab(29>|"bal nr" 
» 

220 printf x f orq=lto4@: print” * " ; snextq 
230 return 

*** EINDE LISTING *** 


wegwezen 


regel 

i 

147 

regel 

120 

211 

regel 

2 

248 

regel 

130 

11 

regel 

3 

254 

regel 

140 

110 

regel 

4 

38 

regel 

150 

235 

regel 

5 

143 

regel 

160 

171 

regel 

10 

49 

regel 

170 

238 

regel 

20 

210 

regel 

180 

252 

regel 

30 

3 

regel 

190 

234 

regel 

40 

64 

regel 

200 

116 

regel 

50 

161 

regel 

210 

244 

regel 

60 

128 

regel 

220 

95 

regel 

70 

112 

regel 

230 

142 

regel 

80 

54 




regel 

90 

102 




regel 

100 

193 

ready. 



regel 

110 

207 




Cursor routine 


De Commodore-64 kent standaard geen locate of print-at 
opdracht. Deze opdrachten zorgen ervoor dat de cursor exact 
daar op het scherm wordt geplaatst waar de programmeur hem 
hebben wil. Bij de 64 moet men zich behelpen met de cursor- 
besturingstekens, de lange rijen met inverse tekens zijn bij 
iedereen bekend. 

Een goede cursorbesturingsroutine kan uiterst handig zijn, 
vandaar dat we onderstaand programma publiceren. Met 
behulp hiervan kan men goochelen met de cursor, een en ander 
wordt u door de, in het programma aanwezige demo duidelijk 
gemaakt. 


1 rem cursor routine / cbm-64 

2 rem door jan pijnacker 

3 rem uit breezand 

4 rem 391 

5 rem 


rem machinetaal $c000 <49152) - * 
C032 (49202) 

rem - begin programma - 

poke532B0,0!poke53281,0;print"CCLR- 
HO ME3CRVS-aan3CGRQEN3@ x,y vl.1” 
fort=0to49s readas poke49152+t,a: next 
sys49152:a-1spokel 98,0iprint“CCLR- 
HOM El” | 

@10,0:print”CGROEN]demootje met ' 

8 x , y ’ ” 

012,12sprint"CWIT] commodore in-fo" 
®11,24 s print"C1.groenIdoor jan pi 
inackerlRVS-aan 3"j 
xl=lix2-38iyl-liy2-23 

rem - hoofd programma - 

fork=4tol3spoke646,rnd<1)*14+2 
geta*iifa*<>“"then1220 

y=yliforx„xl+ltox2-l 

8x , yx pr int n -r“ ; : nexts @x , y : pr i nt "i “ 

I 

x=x2x fory=yl + ltoy2-l 

@x,y:print"H"j:nexts@x,ysprint" J " 

t 

y-y2s forx-x2-ltox1 + lstep-l 
8x,ysprint"+"i s next s0x,y:pr int" *•" 

I 

x=x ls f ory=»y2-ltoy 1 + lstep-l 
8x,ysprint"1" | inext»0x,y:print" r " 

I 

xl=xl+aix2=x2-as yl=yl+asy2=y2-a 

nextxa»(nota)+lxgotol100 

print”CCLR-HOMElCRVS-uitlCCYAANia 

x,y aanzettens sys49152” 

pr int"Cneer30x,y kan niet worden 

samengebruikt met” 

prinfds meeste andere basic-uitb 
reidingen." 

print" Cneer30 =•< x <= 39 en 0 ■>•< 
y <“ 24 anders" 

prinfvolgt een f outmel ding ! " : poke 
198,01 

rem - machinetaal data - 

data162,11,160,192,142,8,3,140,9, 
3,96,32,115,0,201,64,240,6,32,121 
,0,76 

data231,167,32,115,0,32,235,183,2 
24,25,176,13,164,20,192,40,176,7, 

24 32 

data240,255,76,18,192,76,72,178 


*** EINDE LISTING *** 


cursor routine 




regel 

1 43 


regel 

1170 

50 

regel 

2 51 


regel 

1180 

78 

regel 

3 204 

regel 

1190 

47 

regel 

4 44 


regel 

1200 

116 

regel 

5 143 

regel 

1210 

73 

regel 

1000 

110 

regel 

1220 

166 

regel 

1010 

168 

regel 

1230 

155 

regel 

1020 

2 

regel 

1240 

94 

regel 

1030 

199 

regel 

1250 

5 

regel 

1040 

181 

regel 

1260 

169 

regel 

1050 

218 

regel 

1270 

206 

regel 

1060 

31 

regel 

1280 

74 

regel 

1070 

213 

regel 

1290 

96 

regel 

1080 

208 

regel 

1300 

209 

regel 

1090 

179 




regel 

1100 

129 




regel 

1110 

68 

ready. 



regel 

1120 

200 




regel 

1130 

52 




regel 

1140 

202 




regel 

1150 

68 




regel 

1160 

78 
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Borderscroll 


Vroeger leek het onmogelijk om in de border van het scherm van 
de Commodore-64 te komen. Zo’n twee jaar geleden verscheen 
de eerste software die liet zien dat het wel mogelijk was. Voor 
veel mensen is de buitenste rand van het scherm nog een 
verboden gebied. Per vandaag kan hier verandering in komen; 
machinetaal programmeurs krijgen namelijk van het pro¬ 
gramma, Borderscroll dat gebruik van dit randgebied maakt, 
een kijkje achter de schermen. 

Waar het natuurlijk in de hoofdzaak om gaat is het programma 
zelf. Dit is een zeer interessante lichtkrant, waar natuurlijk ook de 
niet programmeurs fraaie dingen mee kunnen doen. 


1 rem bardsrscroll / cbm-64 

2 rem jan piinacker 

3 rem uit braezand 

4 rem 391 

5 rem 

130 rem in 16383 ie een waarde te pok 
en tussen 0-255 die dan als bitma 
p in de 

140 rem border komt. b.v bii 253 word 
t de border vol en bij 128 dunne 
1 i j nt j es. 

170 rem helaas is de kleur altijd zwa 
rt, dat is niet te veranderen ! 

175 rem na sysl6384 is de border leeg 
gemaakt! in 16383 is dan dus een 
O gezet. 

180 rem er is nog ongeveer 13.5 kb vr 
ij voor basic als de data is wegg 
epoket. 

190 rem geheugentop ligt op *3e000 va 
nwege de sprites, zie regel 200 

195 rem - begin programma - 

200 poke56,62ipoke55,0z poke53,62 1 poke 
51,0ipoke53281,14ipoke53280,6ipoke 
2, 1 

210 rem zet in geheugenplaati 2 een 1 
dan start borderscroll na sysl63 
84 meteen 

220 print“CCLR-H0ME3 CBLAUW!CRVS-aan3b 
orderscroll v1.4" 

230 pr int " [neerlaanzetten door sysl63 
84 en uitzetten" 

240 print"door stop/restore of zie re 
gel 3500 e.v" 

246 print"Cneerlm.c op *4000 (16384) 

- *4100 (16640)" 

250 print"tekst op *4100 (16640) - *4 

200 (16896)" 

260 pr int " Cneer 31ekst uit data inleze 
n en in geheugen" 

270 pr inf'poken, zie regel 1000 e.v" 

280 pr int " Cneer3kleuren en bitmap, zi 
e regel 2000 e.v" 

290 pr int " Cneerly-expand zie regel 30 
00 e.v" 

300 pr int 11 Cneer 3al 1 een sprits 0 kan n 
og zelf gebruikt" 

310 prinfworden als de borderscroll 
aanstaat,C3xspatie3zie regel 4000 
e.v" 

320 pr i nt " Cneer 3CRVS-aan3 pas wel op 

met 'poken' want de andereC2xspatie3" 

» 

330 pr int"C2xspatie3spr1tes mogen nia 
t veranderd worden!! " 

340 gosub30000 

500 print"CCLR-H0ME3 CRVS-aan3inlezen 

van de m.c data regel 504-510Cneer3" 

504 b1 = 17000 1 rem bl kan veranderd wor 
den in b.v 70© of 49152 


505 fort**0to26ireada>pokebl+t,ainexti 
rem m.c voor scroll uitzetten 

507 rem - scroll uit m.c data - i 

508 datal20,162,49,160,234,142,20,3,1 
40,21,3,160,1,140,14,220,136,140, 
26,208 

509 datal69,27,141,17,208,88,96 

510 b2“16384ifort“@to255ireadaipokeb2 
+tiaInextIrom b2 niet veranderen! 

520 gosub30000 

1000 pr int"CRVS-aan3Cneer3inlezen van 
de tekst regel 1010—1030Cneer3" 

1010 reada*i ifa*=" + "then 1030 

1020 t*=t*+a*:goto1010 

1025 rem voeg puntjes toe 

1030 iflen(t*)<2551hent* = t*+"."igoto 10 
30>rem i.p.v "." kan b.v ook " ", 

“—" enz. 

1035 gosub30000 

1040 rem gebruik het scherm voor omrek 
enen van ascii-code naar poke-cod 
e 

1045 pr int"CCLR-H0ME3"t*"."I rem dan mo 
et dit "." ook een " enz. w 

orden! 

1050 print“CRVS-aan3Cneer3 in geheugen 
poken van tekst regel 1060Cneer3" 
ï b=16640 

1060 fort=0to255ipokeb+t,peek<1024+t)i 
nex t 

1065 gosub30000 

2000 v = 53248« pokev + 23,255 1 print"CCLR-HOME3 
CRVS-aan3kleuren van sprites en b 
itmap in border" 

2010 pr int"Cneer 3 al 1e sprites dezelfde 
kleurCneer]"isysl63B4 


nab eS 


tell en 


ABONNEMENTEN 
OUDE NUMMERS 


Abonnementen kosten ƒ 55,- en voor een vol 
jaar Commodore-lnfo (10 nummers) is het 
verreweg het gemakkelijkste, wanneer u dat 
bedrag aan ons overmaakt op giro 1585491 tnv. 
SAC Blaricum of op onze bank in België BBL 
nr. 310050602562 

OUDE NUMMERS 

Reeds verschenen nummers zijn na te bestellen. 
Maar, helaas, NIET per brief, kaart of telefonisch. 
We leveren die oude nummers alleen bij 
vooruitbetaling op onze giro 1585491. 

De prijs is ƒ 6,75 per nummer 
(dus aangeven welk nummer). 

Van de eerste jaargang, 1984, zijn alleen nog de 
nummers 2, 4 en 5 beschikbaar. In dat jaar zijn 
overigens maar vijf nummers verschenen. 




v.. 


jXi.-r- 
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2020 fort-1to7ipokev+39+t,0inext 


4190 prinfen alle overbodige tekst en 

2030 go*ub30000 


rems eruit-" 

2040 print"Cnttr3virichi11ende kleuren 


4200 pr int "hal en. u runt dan dat progr 

en barder volCneer]" 


amma zodat" 

20S0 pokel6383,255!fort=*lto7ipokev+39+ 


4210 prinfalle data wordt weggepoket 

t,t+6snext 


en geeft" 

2060 gasub30000 


4220 print" daarna load (in het program 

2070 pr int"CneerDnog een tndiri bitmap 


ma) zodat" 

in de borderCneer 3“ 


4230 prinfuw eigen programma geladen 

2080 pokel6383,231 : rem 231 = 7.11100111 


wordt." 

2090 gosub30000 


4240 pr int"Cneer3 in uw eigen programma 

2100 pokel63B3,0ifort-lto7ipokev+39+t, 


zet u dan de" 

6:next 


4250 pr int " k1euren en de y-expand, dan 

3000 print"CCLR-HOME3CRVS-aan3y-expand 


sys16384" 

van de sprites" 


4260 prinfen dan nog de door u gewens 

3010 pr int 11 Cneer 3y-expand uit doori po 


te bitmap." 

ka 53248+23,0Cneer3" 


4270 prinfuw eigen programma loopt da 

3020 pokev+23,0igosub30000 


n verder" 

‘ 3030 pr int " Cneer 3y-expand aan doori po 


4280 print"terwijl in de border de tek 

5 ke 53248+23,254Cneer3" 


st 1oopt!Cneer3" 

3040 pokev+23,254igoaub30000 


4290 print"de gevorderde programmeur k 

1 3500 print" CCLR-HOME3CRVS-aan3bordersc 


an proberen" 

rol 1 uit- en aanzetten" 


4300 print"de machinetaal zo te verand 

1 3510 pr i nf Cneer 3borderscrol 1 uitzette 


eren dat" 

n doori »y«"b1“Cneer3" 


4310 print”alleen de border wegblijft. 

j 3530 sysb1 


er kunnen" 

jij 3540 gosub30000 


4320 print"dan eigen toepassingen in d 

3550 print " Cneer3borderscrol1 weer aan 


e border" 

doori sys16384Cneer1" 


4330 print"worden gezet (b.v een klok) 

3570 sys 16384 


.C2xneer3" 

3580 gaeub30000 


4340 gosub30000 

3590 pr int"Cneerlals de borderscroll u 


4350 print"CCLR-HOME3CRVS-aanIveel ple 

j itstaat kunnen" 


zier met borderscrol1 ": poke198,0 

3600 print"weer gewoon 8 sprites gebru 


29990 end 

i kt worden .“ 


30000 pr inttab < 13)"druk een toets" 

3610 prinfin de geheugenpl aatsen 2040 


30010 pokel98,0iwalt 198,1ireturn 

-2047 staat" 


31999 rem - scrol1 m.c data - 

1 3620 pr int"248-255 dus de spritevorm m 


32000 data 120, 162,23, 160,64, 142,20,3,14 

oet dan" 


0,21,3,160,1,140,26,208,136,140,1 

4 3630 pr int"gepoket worden van 248*64 v 


4,220 

oor sprtie 0" 


32001 data76,203,64,120,169,1,141,25,20 

3640 pr int "tot 255*64 voor spr ite 7. Cneer ] ” 


8,165,2,208,20,230,2,160,0,140,18 

3650 gosub30000 


, 208 

4000 print" CCLR-HOME3CRVB-aan3demootje 


32002 data200, 140,21,208,169,19,141,17, 

met sprite 0" 


208,88,76,49,234,198,2,169,27,141 

4010 print"Cneerlpolnter 2040 staat op 


,17,208 

*3e0O <15872) " :x « 160 : y=100ipoke1 


32003 data169,248,141,18,208,169,255,14 

98,0 


1,21,208,162,21,62,66,62,62,65,62 

4020 pokev,x : pokev+1,y ; rem zet sprite 


f 62|64 

0 op x=160 en y=100 


32004 data62,62,130,62,62,129,62,62,128 

4030 pokev+23,peek(v+23)and254:rem zet 


,62,62,194,62,62,193,62,62,192,62 

sprite 0 y-expand uit 


,62,2 

4040 pokev + 29,peek <v + 29)and254irem zet 


32005 data63,62, 1 , 63,62,0,63,62,66,63,6 

sprite 0 x-expand uit 


2,65,63,62,64,63,62,130,63,62,129 

j 4050 pokev+39,1irem kleur 1 wit 


,63,62 

j 4060 pokev+2B , peek ( v+28 ) or1irem multic 


32006 datal2B,63,62,194,63,62,193,63,62 

j olor sprite 0 aan 


, 192,63,202,202,202, 16, 188,198,10 

4070 pokev+37 , 5 1 pokev+38 , 6 I rem multico 


p 16 , 3 

lor kleur 1 en 2 


32007 data32, 151 , 64,88,76, 129,234, 173,1 

4080 fort=0to62i pakel5872+t, 217 i next i rem 


8,65,238,152,64,168,10,10,10,141, 

maak een blokje van sprite 0 


187,64 

4090 pr int"CneerIdruk "spatie" om het 


32008 datal52,74,74,74,74,74,24,105,20B 

demo te stoppen" 


,141,188,64,162,21,160,7,132,10,1 

4100 x-x + 1 i y-y-land255 I ifx >344thenx-0 


69,51 

4110 pokev+16,peek<v+16)and254or-<x>25 


32009 datal33,1,185,0,213,157, 66 , 62,202 

5>irem als x>255 zet dan m.s.b aa 


,202,202,136,16,244,169,55,133,1, 

n 


96,162 

4120 getaSi i-fa*«" M then4140 


32010 data6,142,16,208,232,136,140,29,2 

4130 pokev,xand255ipokev+l,yigoto4100 


08,152, 157,248,7, 136,202, 16,248, 1 

4140 pr int 11 Cneer ]nu sprite 0 weer leeg 


62,14 

maken " 


32011 datal 69,24, 168, 169,33, 157, 1,208,1 

4150 fort»0to62ipokel5872+t,01next 


52,157,0,208,24,105,48,202,202,20 

4160 print"CCLR-HOME3u kunt dit progra 


8,239 

mma ook gebruiken metC2xspatiel uw 


32012 datal38,157,0,62,157,0,63,232,20B 

eigen programma’s." 


,247,142,152,64,96 

4180 print"Cneer3daarvoor moet u dit p 


32997 rem hieronder kunt u ook u eigen 

rogramma overnemen" 


tekst zetten i.p.v dit voorbeeld 
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32998 

rem lees dit voa 

rbeeld wel eerst! 

reg 

2010 

235 

reg 

4070 

76 

rag 

32004 

119 

32999 

rem - tekst da 

ta - 

— 


reg 

2020 

230 

reg 

4080 

121 

rag 

32005 

165 

330O0 

dat a“dit is een 

voorbeeld van 1 

II 

reg 

2030 

128 

reg 

4090 

156 

reg 

32006 

118 

33001 

data"een tekst. 




reg 

2040 

31 

reg 

4100 

76 

reg 

32007 

175 

33002 

data"zorg ervoor 

dat 

II 


reg 

2050 

136 

reg 

4110 

238 

reg 

32008 

1 16 

33003 

data"da tekst ui 

t niet meer dan" 

reg 

2060 

128 

reg 

4120 

150 

reg 

32009 

149 

33004 

data" 255 karakt 

er % 

bestaat en 

II 

reg 

2070 

5 

reg 

4130 

203 

reg 

32010 

111 

33005 

data"eindigt met 

een 

aparte data" 

reg 

2080 

165 

reg 

4140 

84 

reg 

32011 

117 

33006 

data”regel waarl 

n al 1 een een " 


reg 

2090 

128 

reg 

4150 

177 

reg 

32012 

156 

33007 

data"'*-' staat. 

als 

uw tekst min" 

reg 

2100 

30 

reg 

4160 

91 

reg 

32997 

159 

33008 

data"der dan 255 

i karakters bevat" 

reg 

3000 

96 

reg 

4180 

12 

rag 

32998 

199 

33009 

data" worden aut 

omatisch punt" 


reg 

3010 

198 

reg 

4190 

127 

reg 

32999 

66 

33010 

data"ies toegevoegd" 



reg 

3020 

18 

reg 

4200 

229 

reg 

33000 

163 

33100 

data"*-" i rem niet 

vergeten!! 


reg 

3030 

15 

reg 

4210 

149 

reg 

33001 

88 







reg 

3040 

125 

reg 

4220 

149 

reg 

33002 

191 

*** 

EINDE LISTING *** 




reg 

3500 

107 

reg 

4230 

69 

reg 

33003 

249 







reg 

3510 

124 

reg 

4240 

227 

reg 

33004 

162 







reg 

3530 

17 

reg 

4250 

89 

rag 

33005 

96 

B0RDERSCR0LL 




reg 

3540 

1 28 

reg 

4260 

134 

reg 

33006 

129 







reg 

3550 

2 

reg 

4270 

192 

rag 

33007 

26 

r eg 

1 

180 re g 240 

39 

reg 508 

1 1 0 

reg 

3570 

164 

reg 

4280 

176 

rag 

33008 

43 

r eg 

2 

255 rB g 2 46 : 

242 

reg 509 

1 1 

reg 

3580 

128 

reg 

4290 

213 

reg 

33009 

31 

reg 

3 

204 reg 250 

184 

reg 510 

67 

reg 

3590 

34 

reg 

4300 

130 

reg 

33010 

146 

r eg 

4 

44 reg 260 

12 

reg 520 

128 

reg 

3600 

155 

reg 

4310 

7 

reg 

33100 

193 

reg 

5 

143 reg 270 

103 

reg 1000 

65 

reg 

3610 

218 

reg 

4320 

134 




reg 

130 166 reg 280 1 

9B 

reg 1010 

214 

reg 

3620 

220 

reg 

4330 

155 




reg 

140 195 reg 290 

23 

reg 1020 

54 

reg 

3630 

31 

rag 4340 

128 

ready. 


reg 

170 170 reg 300 

242 

reg 1025 

209 

reg 

3640 

151 

reg 4350 

1 1 




reg 

175 234 reg 310 

255 

reg 1030 

93 

reg 

3650 

128 

reg 

29990128 




reg 

1B0 119 reg 320 

201 

reg 1035 

128 

reg 

4000 

198 

reg 30000 170 




reg 

190 154 reg 330 1 

39 

reg 1040 

84 

reg 

4010 

197 

reg 

30010 40 




reg 

195 168 reg 340 

128 

reg 1045 

43 

reg 

4020 

64 

reg 

31999 68 




reg 

200 135 reg 500 

185 

reg 1050 

66 

reg 

4030 

229 

reg 

32000 55 




reg 

210 161 reg 504 

43 

reg 1060 

200 

reg 

4040 

240 

reg 

32001 30 




reg 

220 23 reg 505 

152 

reg 1065 

128 

reg 

4050 

209 

reg 

32002 229 




reg 

230 48 reg 507 ! 

54 

reg 2000 

146 

reg 

4060 

53 

reg 

32003178 





Een Nederlandstalig boek (168 
pag.), waarmee u niet alleen inzicht 
krijgt in wat er met Basic 3.5 alle¬ 
maal mogelijk is, maar ook veel bre¬ 
dere computertoepassingen be¬ 
handeld worden en randapparatuur 
en software uitgebreid aan de orde 
komen. 

Het onmisbare boek 
voor iedere C-16 
bezitter, compleet met 
vele 

pr ogr ammavoorbeelden, 
zoals een klein 
tekstber werkings - 
programma. 


Te koop bij Filmpost, Gameworld, 
CaUmero, Verwijs en Stam, Collec¬ 
tief, PC-shop, Radiobeurs, Cafka. 




VAN START MET 


DE C-16 


VOOR DE C- 16 | 
pook bruikbaar 


€ l voor PLUS 4 


'fru ./fï, ui <?<t .. fat ■ 



Prijs 


% ////? ^ 

1 


% % % % % 

Door Luc Sala en Olaf Simoné 

% ■% % 



ƒ 27,50 

plus ƒ 3,- 
verzendkosten 


Van start met de C-16 in Basic 3.5 


Direkt te bestellen bij: 

Infolist, Ceintuurbaan 5, 

1271 BE Huizen. 

Alleen levering na vooruitbetaling 
van ƒ 30,50. 

Gironummer 3157656 tnv. Infolist, Huizen. 
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Vragen van Gebruikers. 



Ook nu weer gaat Jan Bodzinga in 
op de problemen van onze lezers. 
Zijn rubriek blijkt zeer populair, maar 
laat u dat niet weerhouden uw 
vragen of opmerkingen in te sturen. 
Ook tips en handigheidjes zijn 
welkom.. 


Garbage collection 


Ludo Decock uit Gits vraagt wat er nu 
precies gebeurt als de C-64 (of de VIC) 
tijdens het runnen van een programma 
zo nu en dan lijkt te stoppen met de 
feitelijke verwerking. Je kunt dan op 
alle toetsen drukken, er gebeurt niets, 
terwijl de computer na een paar minu¬ 
ten weer verder gaat alsof er niets 
gebeurd is. 


Het door Ludo beschreven fenomeen heet 
bij Commodore ’garbage collection’. Deze 
bewerking is afkomstig van de bijzonder 
onelegante manier waarop de ontwerpers 
van de Commodore Basic v2.0 hun varia¬ 
belen hebben opgebouwd. In feite is er 
niets aan te doen. Het enige is, om zelf op 
bepaalde punten in het programma een 
garbage collect te forceren door de op¬ 
dracht X=FRE(0) in de listing op te nemen. 
Daardoor wordt door de programmeur be¬ 
paald wanner de verzameling 'vuilnis’ uit 
het geheugen kan worden verwijderd. Ook 
het korrekt omspringen met de variabelen 
kan hierbij helpen. 

De garbage collect is nodig, omdat de C- 
64 alle variabelen, vooral de string in het 
RAM-geheugen laat bestaan, ook al zijn ze 
niet meer geldig. Op die manier raakt na 
kortere of langere tijd het beschikbare 
geheugen vol met niet meer gebruikte 
data. Om dit te verwijderen duikt de C-64 
in een lang proces van zoeken en vergelij¬ 
ken. Hoe meer ongebruikte gegevens nog 
aanwezig zijn, hoe langer de opruimproce- 
dure. Dat hierbij de strings de grootste 
boosdoeners zijn, lijkt me duidelijk. Zo is 
het altijd beter om lange strings die moe¬ 
ten worden geprint niet als variabelen te 
benoemen, maar rechtstreeks via een 
PRINT-opdracht op het scherm te zetten. 


Programma overlay 


J.J.Eissing uit Enkhuizen vraagt of het 
mogelijk is vanuit een bepaald pro¬ 
gramma een ander programma (Basic) 
te laden en te runnen. Hij wil daarbij 
graag de bestaande variabelen be¬ 
houden. 


De hierboven beschreven manier van ’pro- 
gramma-overlay’ is standaard aanwezig 
op alle Commodore Basic-computers. Er 
is helaas een kleine conditie waaraan de 
programma’s moeten voldoen. Het eerste 
programma dat wordt geladen, moet per¬ 
se het langste programma zijn. Je kunt dit 
simpel bekijken, door het aantal blocks dat 
de programma’s innemen op de diskette. 
Ook in de C-64 kan de lengte van een 
programma worden bekeken, door de ZE- 
RO-PAGE adressen voor END OF BASIC 
te peeken. Deze adressen bevinden zich 
op $2D-$2E (45-46). Hoe hoger de waarde 
bij PEEK(46) hoe langer het programma. 
Zijn beide getallen in adres 46 gelijk, dan 
komt ook de waarde in 45 er aan te pas. 
Om een programma een grotere dan de 
werkelijke lengte te geven, moet voordat 
het programma wordt gesaved een hoger 
getal in adres 46 worden gezet. Dit kan 
natuurlijk met POKE 46,getal. 

Als je zorgt dat het eerste programma dat 
wordt geladen en gerund de grootste leng¬ 
te heeft, dan kan daarna via XXX LOAD 
"PROGRAMMA 2”,8 de volgende module 
worden geladen en gerund. Alle variabelen 
van het vorige programma blijven in het C- 
64 geheugen aanwezig inclusief de waar¬ 
de die ze op dat moment hebben. 

VIC uitbreidingen 


A.E.Boom uit Zuidbroek schrijft over 
zijn probleem met de onlangs (tweede¬ 
hands) aanschafte VIC 20. Hij kreeg bij 
de koop ook enkele uitbreidingsmodu- 
les voor de expansiepoort, waaronder 
Superexpander, geheugenuitbreidin- 
gen en diverse andere programma’s. 
Zijn vraag is, of je deze modules ook 
tegelijkertijd op de VIC kunt laten 
werken. 


Hoewel de VIC (helaas) tegenwoordig niet 
meer zo’n populaire machine is, zijn er nog 
duizenden mensen in Nederland die veel 
plezier aan deze computer beleven. De 
moeilijkheid is echter, dat er in de handel 
nagenoeg niets meer te verkrijgen valt dat 
voor de VIC geschikt is. Daarom is het ook 
vergeefse moeite allerlei toch al niet zo 
courante aanvullingen voor de VIC te gaan 


opnoemen. 

In principe is het mogelijk om meerdere 
cartridges op de VIC tegelijk aan te sluiten. 
Daarvoor heb je een 2- of meer-slots uit¬ 
breiding nodig op de expansiepoort. Het 
resultaat is, dat je verschoond blijft van het 
steeds opnieuw insteken van een andere 
cartridge. Het 'switchen' kan dan ge¬ 
schieden door middel van een schakelaar. 
Maar dat is in feite ook het enige voordeel, 
omdat het in 99% van alle gevallen onmo¬ 
gelijk is om meerdere cartridges gelijktijdig 
te laten werken. Bovendien zijn dergelijke 
uitbreidingen niet meer op de markt. 

C-64 als mainframe terminal 


Onlangs hebben we in een artikel de 
PC-10en de C-64 vergeleken. Eén van 
de punten in het voordeel van de PC-10 
was daarbij de gemakkelijke communi¬ 
catiemogelijkheden in relatie met de 
standaard aanwezige RS-232C poort. 
Jos Wouters uit Hasselt vraagt of dit¬ 
zelfde ook niet tot de mogelijkheden 
behoort bij de C-64. 


In een van de vorige nummers van Com¬ 
modore Info hebben we uitvoerig aan¬ 
dacht besteed aan de Userpoort van de C- 
64. Daarbij zijn schema’s afgedrukt voor 
een zelf te bouwen print, die van de User¬ 
poort een simpele, maar erg goed werken¬ 
de seriële poort maakt. Ook de software 
die erbij moet worden gebruikt is in dat 
artikel te vinden. 

Commodore heeft indertijd zelf een soort¬ 
gelijk module op de markt gebracht, de 
VC1011, maar deze interface is bijna ner¬ 
gens meer te verkrijgen. Met hulp van dit 
module of een soortgelijke outfit is het dan 
mogelijk om de C-64 te laten communice¬ 
ren met elke willekeurige databank of 
mainframe. Wat er daarnaast nog wel tot 
de uitrusting moet behoren is een modem 
en de nodige bekabeling. 

Elimineren RUN/STOP 


Frederik de Bruin, Amsterdam heeft 
een serie programma’s waarbij de 
RUN/STOP en soms zelfs RUN/STOP- 
RESTORE niet werkt. Hij wil dit in zijn 
eigen programma’s ook graag toepas¬ 
sen, maar weet niet hoe dit moet. 


Hoewel deze truuk aan de meeste lezers 
inmiddels wel bekend zal zijn, zullen we 
nogmaals de meest simpele opdrachten 
voor het uitschakelen van de RUN/STOP 
toetsen op een rij zetten. 

Om de RUN/STOP KERNAL routine direkt 
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naar de RTS opdracht te laten springen, 
zonder dat de werkelijke test op het in¬ 
drukken van de RUN/STOP toets in uitge¬ 
voerd, moet het sprong-adres in de KER- 
NAL worden aangepast. Dit adres vinden 
we op $328-1329 (808-809). Normaal is de 
inhoud van 808 237. Poken we nu het 
eindadres van de routine hier, dan zal het 
door ons gewenste effect zijn bereikt. Dit 
kan door de opdracht POKE 808,239. De 
RUN/STOP blijft dan uitgeschakeld tot de 
volgende RUN/STOP- RESTORE. Om de 
RUN/STOP toets eerder weer in te schake¬ 
len moet de opdracht POKE 808,237 wor¬ 
den uitgevoerd. 

Om dus ook de RESTORE in combinatie 
met de RUN/STOP toets uit te kunnen 
zetten, maken we gebruik van hetzelfde 
KERNAL-sprong adres, maar met een an¬ 
dere waarde. POKE 808,225 voert deze 
truuk voor ons uit. Ook hier geldt natuurlijk, 
dat het opnieuw aktiveren van deze toet¬ 
sen kan door POKE 808,237 of door het 
uitschakelen van de computer. Je ziet, er 
zijn mogelijkheden genoeg om simpele list 
en run beveiligingen in je eigen program¬ 
ma’s aan te brengen. 

80 koloms beeldscherm 


Helaas is het geen eenvoudige software- 
kwestie om de 40-koloms breedte van alle 
C-64 computers (dus ook de SX-64) om te 
zetten naar 80 kolommen. Wat daarvoor 
nodig is is een hardware uitbreiding in de 
vorm van een 80-kolommenkaart. In een 
vorige jaargang van Commodore Info heb¬ 
ben we enkele van deze uitbreidingen ge¬ 
test. Ook hierbij is niet alles meer op de 
markt, dat betekent dat u alle aanbiedin¬ 
gen van dit soort kaarten in overweging 
moet nemen. De SX opereert identiek aan 
de normale C-64, waardoor u geen angst 
hoeft te hebben, dat dit type kaarten niet 
zou werken op een SX. Het enige verschil 
tussen C-64 en SX-64 is het ontbreken van 
de cassettepoort en de ingebouwde soft¬ 
ware daarvoor, terwijl ook voor een extra 
monitor alleen de video-uitgang beschik¬ 
baar is, waar de C-64 ook beschikt over 
een RF-uitgang om normale TV-ontvan- 
gers te kunnen aansluiten. 


1571 drive voor 64 


Er blijken nog al wat misverstanden te 
bestaan over het nut van de nieuwe 
1570/71 drives van Commodore bij het 
gebruik met de C-64. 

Zo schrijft Henk v. d. Hoef uit Delfzijl: "Ik 
heb in een artikel gelezen, dat er zowel 
voor- als nadelen zijn bij deze configu¬ 
ratie, maar welke dat zijn is me niet 
duidelijk. ” 


Het verschil tussen de 1541 en de 157X 
serie drives is voor het gebruik samen met 
de Commodore 64 niet zo groot. Hoewel 
de 1570 in staat is de data-overdracht over 
de bus veel sneller te doen verlopen dan 
de 1541 geeft dit bij de C-64 geen snel¬ 
heidswinst, omdat de 64 zelf niet op deze 
'gigantische’ snelheden berekend is. Deze 
snelheid kan alleen worden benut door de 
C-128 te gebruiken in 128-mode. Want 
ook de 128 in 64-mode gebruikt de 1570 
als was het een 1541. Daarbij komt, dat de 
interne DOS van de 157X serie aanmerke¬ 
lijk verschilt van die van de 1541, zodat een 
groot gedeelte van de beveiligde software 
niet zal runnen op de 1570/71. Dit geldt 
met name voor de software die beveiligd is 
met hulp van TRACK/SECTOR/Guide- 
track veranderingen op de disk. De sys- 
temcalls naar de interne software van de 
drives verschillen dusdanig dat hier maar 
erg moeilijk een oplossing voor te vinden 
is. Er zijn echter enkele cartridges op de 
markt, die pretenderen hier in de vorm van 
een backup van de betrokken software 
een oplossing voor te kunnen bieden. Als 
je zo’n module gaat gebruiken, denk er dan 
wel om, dat je in feite illegaal bezig bent. 
De verantwoording voor dit alles ligt abso¬ 
luut bij de gebruiker. 

Al met al kun je stellen, dat het geen 
problemen oplevert om een 1570/71 te 
gebruiken samen met de C-64, voordelen 
heeft dit echter niet, of het zou moeten zijn, 
dat je overweegt om in de toekomst een C- 
128 aan te schaffen. 

Koppeling PET aan C-64 


A.A.van der Heijden uit Zoetermeer 
vraagt of het mogelijk is een koppeling 
tot stand te brengen tussen de PET en 
de Commodore 64. 


Hoewel beide apparaten van dezelfde 
merknaam zijn voorzien, zijn het totaal 
verschillende soorten computers. Na de 
aanvankelijk succesvolle start met de 
CBM/PET machines is Commodore op 
een nieuwe lijn overgestapt, met de lance¬ 
ring van de VIC en later de C-64/128. Het 
grote verschil tussen beide typen is de 
data-overdracht naar de periferieken. De 
oude PET gebruikt daarvoor het IEEE pro¬ 


Mevr. W. Verhoef is één van de gelukki¬ 
gen die met een draagbare Commodo¬ 
re 64 werken, de SX-64. Het enige 
probleem daarbij vindt ze de grootte 
van de monitor (3 1/2 inch). Haar vraag 
is, of het mogelijk is om op een apart 
beeldscherm regels te krijgen met een 
breedte van 80 kolommen. Ze heeft 
met Easy- script het een en ander ge¬ 
probeerd, maar hoewel de regelbreed- 
te van de tekstverwerker op 80 was 
ingesteld bleef ze ook op de extra 
monitor 40 karakters per regel houden. 


tocol. Dit is een parallel (8-bits) uitgang, die 
in de zeventiger jaren vaak werd gebruikt 
voor het besturen van machines e.d. Com¬ 
modore meende, dat deze IEEE 448 een 
grote toekomst had en configureerde 
daarom al zijn computers met een soortge¬ 
lijke poort. De nieuwere Commodore huis- 
computers, zoals de VIC, C-64/128 en C- 
16/Plus 4 zijn alle voorzien van seriële 
poorten. Het gevolg daarvan is, dat het op 
dit moment niet gemakkelijk is, om de C-64 
te koppelen aan zo’n ouderwetse IEEE- 
machine. Je kunt het proberen door de C- 
64 te voorzien van een standaard IEEE 
interface. Daarmee kan ook naar de PET 
data worden gestuurd. Verdere mogelijk¬ 
heden moet je zoeken in het uitwisselen 
van diskettes - zowel de PET 4040 als de 
1541 gebruiken hetzelfde diskformaat - of 
de userpoort van de PET. We zullen op de 
laatste mogelijkheid binnenkort uitvoerig 
terugkomen. 

COMMOMEDICA 

De huisartsenadministratie kan nu ook op 
de C64 en Cl 28. RBK-data BV brengt 
twee in de praktijk ontwikkelde pakketten 
die op gebruiksvriendelijke wijze facture¬ 
ren, patiëntenbestanden verwerken, debi¬ 
teuren administreren/aanmanen en jaar¬ 
overzichten maken. 

Er zijn drie versies die kompleet met com¬ 
puter, groen monitor, diskdrive, printer en 
software verkocht worden: 

O Commomedica 64 voor 1100 debiteu¬ 
ren, 2650 gezins(patient)-kaarten en de 
financiële administratie. 

0Commomedica 128 met 1250 debiteu¬ 
ren en 3000 gezinskaarten en als extra 
maatschapsadministratie, 100 passanten, 
100 keuringen, medicatiegegevens, ge¬ 
boortedata, maand- en debiteuroverzich- 
ten. Optioneel is een statistische analyse. 
© Commomedica PC 10 voor 3500 debi¬ 
teuren, 7500 gezinskaarten, 255 passan¬ 
ten of keuringen, statische analyse en HIS 
opwaarts compatibel. 

Aan deze veel tijdsbesparende pakketten 
hangt wel een echt artsenprijskaartje va¬ 
riërend van 3800 tot ongeveer 9000 gul¬ 
den. Tamelijke dure software dus want in 
de apparatuur kan het hem niet zitten. 
Verder kunt u het Commomedicasysteem 
uitbreiden met een Service- en Up Grade- 
abbonnement, een verzekerspakket en 
een computertafel. 

Nadere info bij: RBK Data BV, Koren¬ 
schoof 97, 3224 VB Hellevoetssluis, ® 
01883-21373 
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Van de grafische en muzikale ta¬ 
lenten van de Amiga was ieder¬ 
een al overtuigd. Nu komen daar 
een solide softwarebasis met se¬ 
rieuze inslag bij. Tijd om de 
nieuwe Amiga-software eens op 
een rijtje te zetten. 

Amiga 

Software 


Deze glazen zijn gemaakt met het "Images Paint System” pakket van Aegi 



Een bloemlezing uit het serieuze aanbod. 


C ommodore ziet haar Amiga hele¬ 
maal zitten en meldt ook vol 
trots, dat de laatste maanden het 
software repertoire drastisch is 
uitgebreid. Niet alleen door 
Commodore zelf, maar ook door tal van 
andere Amerikaanse en Britse soft¬ 
warehuizen. Op de PC User Show in 
London bekeken we de nieuwtjes. 

De zakelijke, grafische en audiovisuele 
sector geven een ware hausse in (echt) 
voor de Amiga ontwikkelde software te 
zien. En met de introductie van de Sidecar 
IBM PC hardware emulator kan Commo¬ 
dore zelfs van een "Business Amiga” 
spreken. 

Of de Amiga een soort veredelde PC gaat 
worden, laat zich nu nog niet voorspellen. 
De geschiedenis leert dat Commomdore, 
ondanks de vaak eigenzinnige koers, grote 
successen kan boeken. Machines als de 
C-64 en C-128 behoren tot de meest ver¬ 
kochte computers ter wereld en drijven 
letterlijk op een zee van goedkope en 
goede software. 

Voor de Amiga gaat dat nog niet op, al is, 
zols u verderop in dit artikel kunt lezen, het 
software-aanbod sterk gegroeid. Met de 
Sidecar kan vrijwel het gehele PC-reper- 
toire onder MS-DOS 2.11 en hoger op de 


Amiga draaien. En de prijs van de Amiga is 
daarbij de laatste maanden ook wat ge¬ 
daald. 

Amiga-lijn 

Inmiddels is er ook al sprake van een 
Amiga-lijn. De enigszins beperkte 256 K 
RAM-versie wordt door menig leverancier 
al tot 512 KB uitgebreid en binnenkort wor¬ 
den de eerste Megabyte-modellen ver¬ 
wacht. Bovendien blijkt de Amiga eigenlijk 
model 1000 (iedereen dacht dat het 
slechts bij één machine zou blijven) te zijn 
en bevinden zich achter gesloten deuren 
een 2000 upgrade en wellicht ook een 
”low-end” model. Volgens geruchten zou 
de Amiga 2000 over een Motorola 68020 
microprocessor, een ingebouwde Sidecar 
met meerdere Amiga- en IBM PC-uitbrei- 
dingsslots en 2 MB RAM-geheugen be¬ 
schikken. De softwarehuizen zijn zijdelings 
al geïnformeerd over de noodzaak om 
Amiga-programmatuur compatibel met de 
68020 te houden. 

Grafische software 

Traditioneel zijn de "graphics” de sterkste 
kant van de Amiga en vormden zij de 
speerpunt van de software-ontwikkeling. 
Inmiddels zijn er al heel wat pakketten 


verkrijgbaar. Het softwarehuis Aegis 
brengt de pakketten Aegis Animator, 
Draw, Images en Impact op de markt. 

De Aegis Animator is zoals de naam al 
aangeeft een animatiepakket. Met Aegis 
Animator verandert de Amiga in een kom- 
plete tekenfilmstudio. Zij het dat het ar¬ 
beidsintensieve handwerk nu vrijwel ge¬ 
heel door de software en de fraaie Amiga- 
graphics wordt overgenomen. Na het ont¬ 
werpen van de figuurtjes laten zij zich op 
eenvoudige wijze animeren. 



De speciale tweening-techniek (een 
"tween” is een tijdssegment) maakt opti¬ 
male controle over de bewegingen en ver¬ 
anderingen in elk animatiesegment moge¬ 
lijk. De Aegis Animator biedt 32 kleuren uit 
een totaal van 4.096, animatie van de 
afzonderlijke delen (bijvoorbeeld ledema- 
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ten) van de grafische figuurtjes, maximaal 
9 storyboards, overlap, het vervormen van 
figuren (metamorfose), ghost shapes, di¬ 
verse teken- en fill-opdrachten en nog veel 
meer. Aegis Animator gaat rond de ƒ 400,- 
kosten. 

Aegis Draw is een CAD-tekenpakket 
voor de Amiga. Het pakket beschikt over 
alle tekenfuncties van goede CAD-soft- 
ware, automatische schaalinstelling, een 
zoomoptie, diverse rasters en patronen en 
een multiple layer-techniek (meerdere la¬ 
gen over elkaar). 

Inmiddels is er ook een uitgebreidere Pro- 
versie van Aegis Draw verschenen. De 
gewone versie kost ca. ƒ 560,-. 

Aegis Images is een artistiek paint-pak- 
ket dat onder meer voor het maken van 
achtergronden voor de animator gebruikt 
kan worden. Naast tal van kleuren en 
meerdere penselen kan de gebruiker 
kiezen uit geavanceerde tekentechnieken 
zoals roteren, spiegelen, smear ("uitvegen 
met de vingers”), copy, diverse overlays, 
diverse grids, verschillende fill-gradiënten, 
smoothing en tal van special effects. Ima¬ 
ges kost in de computershop ca. ƒ 240,-. 
Voor de eigen Aegis teken- en anima- 
tiepakketten en ook voor Deluxe Paint, 
Graphicraft en Deluxe Video Construction- 


set heeft Aegis onlangs twee illustratiebi- 
bliotheken, Artpak 1 en Artpak 2, op dis¬ 
kette uitgebracht. Artpak 1 bevat onder¬ 
werpen als de prehistorie, dieren en ste¬ 
den. Artpak 2 heeft bomen, planten, na¬ 
tuurscènes, sporten en zakelijke sym¬ 
bolen. 

Aegis Impact is een "business graphics” 
pakket voor het ontwerpen van grafieken, 
diagrammen en ikonen. Ook is het moge¬ 
lijk om de verschillende figuren als een 
soort diapresentatie op de Amiga of video¬ 
band af te draaien. 

Electronic Arts, het bekende Amerikaanse 
softwarehuis, is ook helemaal op de Ami- 
ga-tour. Het schilderpakket Deluxe Paint 
is al flink op weg om een internationale 
topper te worden en werd reeds door ons 
besproken. De mogelijkheden zijn legio. 
Bijvoorbeeld zoom-vergrotingen, kleuren 
cyclisch in elkaar laten overgaan, kleuren 
mengen, smear, uitrekken en verbuigen, 
roteren en split-screen vergrotingen. 



Nieuw is Deluxe Video Constructionset, 
een kompleet softwarepakket voor het 
maken van videoclips, graphics, animaties 
en special effects. 

Commodore zelf brengt het grafische pak¬ 
ket Graphicraft uit. Een kombinatie van 
een ontwerp- en schilderprogramma met 
keuze uit 32 kleuren, diverse paint- en 
special effects, en kleurenanimatie. 
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Databases 

Superbase van het Engelse Precision 
Software is een geheel op de Amiga afge¬ 
stemde versie van deze Commodore data¬ 
base. Het Amiga-Superbase is volledig 
muis- en aftrekmenugestuurd, voorzien 
van tal van nieuwe mogelijkheden en aan¬ 
zienlijk sneller dan zijn Commodore voor¬ 
ganger. Dit databaseprogramma biedt de 
gebruiker o.a.: een maximale filegrootte 
van 17.000 Megabytes, een ongelimiteerd 
aantal files en eveneens een ongelimiteerd 
aantal geopende files, 16 miljoen records 
met een onbeperkt aantal velden per re¬ 
cord, onbeperkte sorteer- en zoekcriteria, 
diverse rapportmogelijkheden, in/export 
van ASCII- en DIF-files, programmeerbaar 
via de eigen gestructureerde Basic inter- 
preter, en een ingebouwde kalender. 

Het Britse softwarehuis Taurus-lmpex 
noemt haar database Acquisition "Infor¬ 
mation management with a Creative ed- 
ge”. Acquisition is een database manage¬ 
ment systeem, speciaal gemaakt voor de 
Amiga. 



Dit DBMS gebruikt een mapped filing sy¬ 
steem dat rondom relationele of hierarchi¬ 
sche bestandsstructuren, of een kombina- 
tie van beide georganiseerd is. De maxi¬ 
mum veldgrootte bedraagt 10 Megabyte 
en dat van een file 1 Gigabyte. Een record 
kan maximaal 10.000.000 velden en een 
file maximaal 100.000.000 records bevat¬ 
ten. Binnen een toepassing kan Acquisiti¬ 
on met maar liefst 16 files tegelijk werken. 
En de database beschikt over een eigen 
krachtige programmeertaal, Acom, met 
250 verschillende functies. 



Datamat (let op, Data Becker!) van T ransti- 
me Technologies Corporation, New York 
is een relatief goedkope (ca. ƒ 300,-) data¬ 
base voor de Amiga. Het programma is 
een geheel menu-gestuurde relationeel 
dbms en toepassings-generator. Het aan¬ 
tal files per database is onbeperkt. Er gaan 
maximaal 1.024 tekens in een veld, 2000 
velden in een record en 4.000 tekens in 


een record. Een file kan maximaal 
4.300.000 records bevatten. Verder be¬ 
schikt Datamat over 23 mathematische en 
trigonometrische functies, 13 logische 
operatoren, automatische data- en tijdbe- 
rekening, maximaal 10 relaties per datafile 
en kan het dbms met 13 verschillende 
datatypen (waaronder IFF) werken. 

En natuurlijk biedt ook Commodore, onder 
de naam Amiga Base, een eigen professi¬ 
onele database met applicatie-generator 
en een ingebouwde krachtige program¬ 
meertaal voor het formuleren van vragen/ 
zoekacties (queries). 

Spreadsheets 

Analyze is de veelbetekenende naam van 
Micro-Systems’s spreadsheet voor de 
Amiga. Net als de meeste andere hier 
besproken Amiga-software werkt Analyze 
versie 1.2 optimaal samen met de Intuition 
Windows. De spreadsheet meet 256 ko¬ 
lommen bij 8192 rijen. Met behulp van de 
zogenaamde "sparse matrix” technologie 
gebruikt Analyze relatief weinig RAM-ge- 
heugen. Alle standaard spreadsheetfunc- 
ties zoals SUM, MIN, MAX. AVG e.d. zijn 
aanwezig en met een toetsindruk oproep¬ 
baar. Verder zijn er uitgebreide financiële, 
statistische en kalenderfuncties. 

Zelf definieerbare macro’s, 3D worksheets 
en graphics ontbreken nog bij deze versie. 
Mogelijk zijn zij in de toekomstige upgra- 
des wel van de partij. Via de Preferences 
op Amiga's werkbank worden tal van prin¬ 
ters ondersteund. Analyze zal in de winkel 
ca. ƒ 400,- gaan kosten. 

Inmiddels is VIP ook in een Amiga-uitvoe- 
ring verschenen. Vip Professional valt ei¬ 
genlijk niet helemaal onder de spread¬ 
sheets daar dit Lotus 1-2-3-achtige pro¬ 
gramma een compilage is van een spread¬ 
sheet-, database- en graphics-pakket. De 
spreadsheet werkt net zoals 1 -2-3 en be¬ 
schikt over vrijwel dezelfde mogelijkhe¬ 
den. De datamanager rangschikt en analy¬ 
seert de opgeslagen informatie. Maximaal 
kunnen er 8192 records van hoogstens 
256 velden in een file. Erzijn32 verschillen¬ 
de zoekcriteria. Bovendien kunnen een 
aantal databasecommando’s met de 
spreadsheetopdrachten gekombineerd 
worden. De verschillende soorten gra¬ 
fieken lenen zich goed voor het visualise¬ 
ren en analyseren van het cijfermateriaal. 
Er is keuze uit een groot aantal grafiekty- 
pen en de schaalinstelling verloopt auto¬ 
matisch. VIP Professional kost ongeveer 
ƒ 800,-. 

Andere Amiga-spreadsheets zijn Amiga 
Calc van Commodore, LPD Planner van 
Digital Solutions Ine. (256 kolommen en 
65.536 rijen, meerdere Windows per werk¬ 
blad en diverse grafieken) en Unicalc van 
Lattice, met maximaal 256 kolommen bij 
1.024 rijen, context sensitieve hulp, dub¬ 


bele vensters, macroformules en filekop- 
peling. 

Tekstverwerkers 

De aanschaf van een word processor is 
grotendeels een persoonlijke zaak. Soms 
zoekt men slechts een gebruiksvriendelijk 
en snel werkend type voor het schrijven 
van nette brieven. Voor anderen, bijvoor¬ 
beeld een journalist-schrijver, gaat het om 
een ware woordkunstenaar waarin zo veel 
mogelijk opties en vrij RAM-geheugen zit. 
Gelukkig is er op het moment van schrijven 
al keuze uit tenminste vier tekstverwerkers 
voor de Amiga: 

©Textcraft wordt door Commodore op 
de markt gebracht. Deze tekstverwerker 
speelt goed in op de mogelijkheden van 
Amiga’s werkbank Intuition. Er zijn wat 
aardige vondsten zoals een muispointer in 
de vorm van een schaar tijdens de "knip en 
plak” operaties in de tekst en een camera- 
pointer voor het kopiëren. De tekstverwer¬ 
ker is behoorlijk snel en biedt vrijwel alle 
gebruikelijke opties. Extra zijn het accep¬ 
teren van de met de Workbench Notepad- 
utility gemaakte teksten en standaard tem- 
plates voor zakenbrieven, curriculum vitae, 
memo’s en verschillende soorten techni¬ 
sche en zakelijke rapporten. Helaas ont¬ 
breekt er een spellingschecker en is er 
slechts ruimte voor 1 document tegelijk in 
het RAM. 

© Scribble van Micro-Systems is een ech¬ 
te conventionele wordprocessor. Dat wil 
zeggen meer oog voor extra mogelijkhe¬ 
den dan de gebruiksvriendelijkheid. Scrib¬ 
ble is daarom meer geschikt voor de pro¬ 
fessionele gebruiker. Behalve opties als 
voetnoten, koppen, offsets, het in de 
schermdisplay weergeven van vet-, schuin 
en onderstreept schrift e.d. kunnen er drie 
documenten in het RAM-geheugen ver¬ 
werkt worden. Bovendien is het mogelijk 
om via de verschillende vensters aan 
meerdere teksten tegelijkertijd te werken 
en hier de knip-, plak- en kopieerfuncties 
op los te laten. Teneinde compatibiliteit 
met andere wordprocessors te bereiken, 
kunnen de gemaakte documenten in het 
ASCII-formaat worden weggeschreven. 
Ook bij Scribble ontbreken (nog?) een 
spellingschecker en een mail/merge- 
optie. 

©u20Vizawrite Amiga van Viza Software 
brengt (in beperkte vorm) desktop publis- 
hing binnen het bereik van de Amiga- 
gebruiker. Het programma biedt vrijwel 
alle denkbare tekstverwerkerfuncties en 
maakt het mogelijk om tekst en graphics te 
kombineren. De ondersteuning van laser¬ 
printers is in principe mogelijk, maar gea¬ 
vanceerde vormtalen als DDL of Posts¬ 
cript gebruikt men er nog niet voor. 
©Amiga Text is weer een professionele 
tekstverwerker van Commodore zelf met 
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vrijwel alle gebruikelijke tekstfuncties plus 
volledige integratie met Intuition en de 
Amiga graphics. 

Andere aangekondigde wordprocessors 
voor de Amiga zijn Write Hand van het 
Amerikaanse softwarehuis Byte by Byte 
en LPD Writer van het Canadese soft¬ 
warehuis Digital Solutions Ine. 

Geïntegreerde software 

Het programma Logistix van het Britse 
softwarehuis Grafox is nu ook voor de 
Amiga verkrijgbaar. Dit geïntegreerde 
spreadsheet, database en business grap¬ 
hics pakket met een krachtige tijdsmana- 
gementfunctie heeft op de IBM PC al een 
goede faam verworven. Deze "kleuren- 
spreadsheet” biedt voor ƒ 1500,- toch wel 
veel. Eenvoudig gegevensbeheer, diverse 
zoekcriteria, beperkte macro’s, een groot 
aantal verschillende HIRES-graphics met 
ondersteuning van vele printer/plotters en 
tijdsmanagement met ”critical-path analy¬ 
se” staan in één pakket ter beschikking. 
Bovendien kan Logistix ook Lotus 1-2-3- 
en dBase-bestanden inlezen. 

Het Engelse softwarehuis Total Office 
Software LTD zal op korte termijn een 
Amiga-versie van Total Office uitbrengen. 
Total Office is een kombinatie van een 
wordprocessor, spreadsheet, Database, 
grootboekhouding-software en HIRES 
Graphics in een geïntegreerd pakket. 

Muziek 

De Amiga is een ware muziekvirtuoos. De 
vierkanaals-stereoweergave en het digita¬ 
liseren plus effectmatig bewerken van mu- 
ziekpassages biedt de musicus tot op 
heden ongekende studiofaciliteiten in de 
huiskamer. Al die muzikale mogelijkheden 


krijgen bovendien steeds meer backup 
van hardware-(recorders, Midi-apparatuur 
en digitizers) en softwareleveranciers (mu- 
ziekpakketten). 

Activision’s The Music Studio biedt een 
professioneel compositiepakket voor het 
creëren van welluidende muziekstukken. 
Uitgebreide muzieknotatie op het monitor- 
scherm, het afdrukken van notenschrift, 
kopiëren, transponeren, zelf instrument- 
klanken ontwerpen, geluids-effecten, 
mixen en Midibesturing vormen slechts 
een kleine greep uit de vele mogelijk¬ 
heden. 

Micro Forgo heeft een Amiga stereo 
sound digitizer met editor ontwikkeld. De¬ 
ze hardware digitizer kan zowel geluid, 
geluidseffecten als spraak aan andere 
Amiga-software, bijvoorbeeld Deluxe Vi¬ 
deo Constructionset, toevoegen. 

Utilities en talen 

Ook de hulpprogramma’s en program¬ 
meertalen voor de Amiga zitten lekker in de 
lift. Kuma’s K-Seka is een veelzijdige as- 
sembler voor de 68000 processor. Het 23 
KB grote K-Seka zet 25.000 regels per 
minuut van mnemonics over naar uitvoer¬ 
bare object codes. Het pakket bestaat uit 
een editor, een disassembler, linker en een 
onder Amiga Dos draaiende machinetaal- 
monitor. 

Micro Forge’s Programmers’ Editor ver¬ 
schaft de Amiga-gebruiker een vanuit de 
werkbank toegankelijke RAM disk. Deze 
Ram disk verschijnt in een eigen ikoon en 
functioneert als een "Amiga diskdrive”. De 
maximale geheugencapaciteit van de disk 
bedraagt 1 Megabyte. Micro Forge’s 
RAM-disk kost ca. ƒ 100,-. 

Micro-APL Amiga van Micro-APL be¬ 


schikt over een full screen function editor, 
muisbesturing, uitgebreide ondersteuning 
van standaard printers en Utilities voor het 
instellen van de muisparameters, menu’s, 
vensters, l/O-poorten, boodschap-boxes 
en interfaces. 

AC/Fortran 77 van Absoft is de nieuwe 
Fortran-standaard voor 68000 (en 68020)- 
computersystemen. Het pakket bestaat 
uit een full screen source level interactive 
symbolic debugger, linker, library manager 
en C-interface. De prijs is ongeveer ƒ 100,-. 
Van het softwarehuis Lattice komt de Lat- 
tice C-compiler die deze populaire pro¬ 
grammeertaal geschikt maakt voor de 
Amiga. Lattice C voldoet volledig aan de 
specificaties van Kernighan en Ritchie, en 
beschikt over de ANSI-uitbreiding en vele 
extra mogelijkheden. Deze C-versie kost 
ca. ƒ 450,-. 

Metacomco’s MCC Pascal voldoet aan de 
ISO 7185-norm en bestaat uit een screen 
editor, een linker, libraries, een C-interface 
en natuurlijk een uitgebreid handboek. De¬ 
ze Pascal-versie voor de Amiga kost rond 
de ƒ300,-. 

Tot slot voor de liefhebbers van kunstmati¬ 
ge intelligentie Metacomco’s Cambridge 
LISP. Deze Cambridge-versie bevat inter- 
preted en compiled modes met full tracing. 
De prijs bedraagt ca. ƒ 50,-. • 


Amiga-bezitters behoeven zich geen 
zorgen meer om het aanbod aan soft¬ 
ware te maken. De Amiga breekt nu 
zowel op het zakelijke, grafische als 
muzikale terrein door. Import in ons 
land o. a. door Aackosoft, Ariolasoft. 
Cafka en Computer Collectief. 
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Voor de CBM-64 zijn al aardig wat programmeertalen beschikbaar. Iedere computer¬ 
gebruiker kan er wel een aantal opnoemen. Een wat minder bekende, maar erg 
leesbare programmeertaal voor de CBM-64 is Comal. In dit artikel worden een aantal 
programmavoorbeelden in Comal besproken. 


Comal 80 

Alternatieve (leer)taal 

B ij het programmeren in Comal 
zijn we af van de goto’s en de 
subroutines. De taal biedt mid¬ 
dels procedures namelijk een 
veel logischer oplossing. 

Dat werkt namelijk veel eenvoudiger. Als 
we in een programma één of meerdere 
keren een kaart van Nederland op het 
scherm willen hebben, dan zetten we op 
een regel: 

0010 teken’kaart 
0020 . 

In dit voorbeeld wordt op regel 10 een 
programmagedeelte uitgevoerd. Zo'n deel 
van een programma heet in Comal een 
procedure. Op het moment dat we regel 
10 typen, hoeven we ons nog geen zorgen 
te maken over de inhoud van die procedu¬ 
re. We vervolgen ons hoofdprogramma en 
later gaan we in op de opbouw van de 
procedures. De volgende regel kan bij¬ 
voorbeeld zijn: 0020 teken’plaats 
Nu wordt de procedure teken’plaats aan¬ 
geroepen en uitgevoerd. Als regel 10-20 
het hoofdprogramma is, kunnen we op 
regel 30 verder met het vastleggen van de 
procedures. Eerst doen we dat met de 
procedure (proc) teken’kaart: 

0030 PROC teken’kaart 
0040 moveto (100,100) 

0050 drawto (...,...)enz. 

Hierna typen we een groot aantal tekenop¬ 
drachten, genoeg om er de kaart van Ne¬ 
derland mee te maken. Aan het eind van de 
procedure, laten we zeggen op regel 200, 
zetten we: 0200 ENDPROC teken’kaart 
Hierna kunnen we de procedure Proc te- 
ken'plaats op gaan stellen. Een groot voor¬ 
deel is dat we met Nederlandse benamin¬ 
gen kunnen werken. Zo behouden we een 
goed overzicht waar we mee bezig zijn. 

Parameters. 

In een procedure kunnen we ook werken 
met getallen of, wat moeilijker, met strings. 
Moeten bijvoorbeeld de getallen 5 tot en 
met 12 op het scherm worden gezet, dan 
kan dat met: 0010 op’scherm(5,12) 
de bijbehorende procedure ziet er dan als 
volgt uit: 

0100 PROC op’scherm(begin,eind) 

0110 FOR getal:=begin to eind DO 



0120 PRINT getal 
0130 ENDFOR getal 
0140 ENDPROC op’scherm 
De spaties achter het regelnummer hoe¬ 
ven wij niet te typen. Na Run wordt dat 
automatisch voor ons gedaan. Merk op 
dat we de procedure nu ook toegankelijk 
hebben gemaakt voor andere getallen. Als 
parameter kunnen we behalve getallen 
ook strings gebruiken. Als we een aantal 
keer een woord op het scherm willen heb¬ 
ben, dan kan dat met: 

0020 herhaal(”Comai”,10) 

De bijbehorende procedure is dan: 

0200 PROC herhaal(tekst$,aantal’keer) 
0210 FOR aantal: = 1 TO aantal’keer DO 
0220 PRINT tekst$ 

0230 ENDFOR aantal 
0240 ENDPROC herhaal 
We zien dat programmeren in Comal niet 
moeilijk is. Tot nu toe is het voorgekomen 
dat tussen sommige woorden een streepje 
(’) staat. Dat is bijvoorbeeld bij de variabele 
aantal’keer het geval. Een spatie kan ech¬ 
ter niet worden gebruikt, want dan zijn het 
twee woorden. Om het daarom nog lees¬ 
baarder te houden, zetten we zo’n streepje 
tussen de woorden. Naast de procedures 
zijn er ook nog de zelf vast te leggen 
functies. 

Functies. 

Net als bij de procedure zullen we weer 
een aantal kleine voorbeelden bespreken. 
Het gaat hierbij niet zo zeer om het nut of 
de bruikbaarheid van die functies. Stel dat 


we in een programma van verschillende 
bedragen een, ook weer verschillend, per¬ 
centage willen berekenen. We gebruiken 
daarvoor de functie, hoe kan het ook an¬ 
ders, Func procent. Deze funktie heeft 
twee parameters. De functie ziet er dan als 
volgt uit: FUNC procent(bedrag,percen¬ 
tage) 

p:=bedragxpercentage/100 

RETURN p 

ENDFUNC 

De variabele p krijgt de waarde van het 
bedrag keer het percentage gedeeld door 
100. De waarde van p wordt daarna terug¬ 
gegeven aan het programma. De aanroep 
van de funktie gaat als volgt: 
waarde: = procent(800,19) 

De variabele waarde wordt gelijk aan 19% 
van 800. We zien dat op deze manier flink 
wat functies vast te leggen zijn. Een voor¬ 
deel is dat het in het Nederlands kan en 
dus leesbaar is. 

Een ander voorbeeld. We willen de moge¬ 
lijkheid hebben om getallen af te ronden, 
bijvoorbeeld op twee cijfers achter de 
komma. In het hoofdprogramma moet dat 
als volgt: 

afg’getal:=afgerond(1.3245,2) 

Het getal 1.3245 (de CBM-64 gebruikt in 
plaats van een komma een decimale punt) 
moet op twee cijfers achter de komma 
worden afgerond. De bijbehorende functie 
is dan: 

FUNC afgerond(x,dec) 
factor:=10 dec //na de 10 pijltje omhoog 
x:=int(x factor+.5)/factor 
RETURN x 
ENDFUNC afgerond 

Bij de laatste twee voorbeelden staan er 
geen regelnummers voor de programma¬ 
regels. Die regelnummers zijn dan ook niet 
belangrijk in Comal. Comal kent geen goto 
(regelnummer)-opdracht en die hebben 
we ook (gelukkig) niet nodig. Programma’s 
blijven hierdoor overzichtelijk. 



75 











Onderwijs. 

De Deen Borge Christensen heeft de pro¬ 
grammeertaal Comal speciaal gemaakt 
voor het onderwijs. Door de leesbaarheid 
van de Comal-programma’s zijn ze een¬ 


voudig aan te passen aan de gebruiker. 
Comal is ook snel. Met de grafische kwali¬ 
teiten van de CBM-64 staat de kaart van 
Nederland dan ook vlot op het scherm. 
Een fraaie klok, een beeldscherm met gra¬ 
fiek en bijbehorende tekst is eenvoudig te 
programmeren. Zie hiervoor de schermaf¬ 
drukken bij dit artikel. Met dat soort beeld¬ 
schermen heb je natuurlijk nog geen on¬ 
derwijskundig programma. Maar na het 
voorgaande zal het duidelijk zijn dat Comal 
een geweldig hulpmiddel is om dat toch 
voor elkaar te krijgen. Uit eigen ervaring 
weet ik dat het zeker de moeite loont. Om 
met functies bij het schoolvak wiskunde te 
kunnen oefenen, maak ik gebruik van het 
volgende hoofdprogramma: 

0010 // programma functies 
0020 // 

0030 PAGE // wil zeggent nieuw beeldscherm 

0040 USE graphios // activeer grafische deel 

0050 dimensies // dimensies en beginwaarden 

0060 LOOP // begin van herhaling 

0070 namen // vraag namen van leerlingen 

0080 uitleg // geeft uitleg 

0090 oefening'l// eerste oefening 

0100 oefening' 2 // vervolg 

0110 evaluatie // beoordeling 

0120 ENDLOOP // einde herhaling 


Na regel 120 komen dan de procedures. 
Achter twee schuine strepen mogen we in 
Comal kommentaar zetten. De precieze 
uitwerking van de procedures is dan na¬ 
tuurlijk iets wat het meeste werk kost. Bij 
het schrijven van meerdere programma’s, 
blijkt dan dat we procedures als namen, 
uitleg en evaluatie steeds weer kunnen 
gebruiken. Deze procedures slaan we 
apart op. Wanneer we ze nodig hebben, 
plakken we die procedures achter een 
hoofdprogramma. Ook dat kan eenvoudig 
met Comal. 

Slot. Ik heb lang niet alles van Comal 
laten zien en besproken. Bij het boven¬ 
staande ben ik uitgegaan van de cartridge- 
versie van Comal. Dit is op dit moment de 
meest uitgebreide versie voor de CBM-64. 
Informatie over de cartridge en over Comal 
kunt u het beste via de Stichting Pascal, 
Bezuidenhoutseweg 225, 2594 AL Den 
Haag (telefoon:070-470261) verkrijgen. 

Noot: In plaats van de volledige benaming Co- 
mal80 wordt in het artikel gesproken over Co¬ 
mal. Comal is afgeleid van Common Algoritmic 
Language. 

Gerard van Eijk. 
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Bulletin Boards Telefoon lijst van databanken 

Van J.Verkerk uit Rotterdam kregen we een bijgewerkte lijst met een groot aantal amateur 
Bulletin Boards/ Databanken in ons land. We houden ons overigens aanbevolen voor verbeterin¬ 
gen of aanvullingen. Jl, 

Naast de hier genoemde (amateur) databanken en BBS zijn er nog een groot aantal Fido-nodes 
en natuurlijk ook professionele databanken, b.v. via Viditel en andere Videotex diensten. 

Bij de meeste databanken kunt u gratis lid worden, maar soms is een abonnement verschuldigd. Deze lijst is met zorg samengesteld, 
maar desondanks kunnen telefoonnummer en tijden afwijken. Daarom is het aan te raden om audio-kontakt te maken, door te bellen u 
hoort vanzelf of u een computer aan de lijn krijgt of niet. Het gaat in vrijwel alte gevallen om V21, dus 300/300 Baud communicatie, maar 
soms zit men ook op de 1 200/75 V23 (Viditel) snelheid, voor zover we dat konden controleren aangegeven met een V. Verbeteringen of 
aanvullingen op de lijst gaarne naar PB.112 te Blaricum. Vermeld op de envelop: CI-BBS. 


De Nederlandse BBS/databanken, gesorteerd op telefoonnummer: 


n 010 : ROTTERDAM 



D 01620 : OOSTERHOUT (NB) 


B372663 

INTERTEL 


22-08. 

© 4113044 

A & R SOFT 


23-02. 

a 31380 FRS OOSTER-MA/VR 

22-02. 

a 434201 V 

K.L.M 



©4122645 

INFOBOARD 


23-10. 

HOUT 



a 435824 V 

ABC DATAVISION 

../.. 


©4126411 

CROOSWIJK 


18-21. 


ZA/ZO 

22-10. 

a437731 

GENERAL ELEC 

../.. \ 


©4162457 

C64-TEL 2 


20-23. 

a 50485 COMPUTOPIA 

MAA/R 

23-02. 

B 444538 

MCN ADRESBR 


24-uur 

©4182124 

MAILBOARD 

ZO/DO 

20.30-23. 

a 554443 GG/BBS 

../.. 

23-08. 

B460311 

DABAS 





VR/ZA 

23-08. 




a 463333 

EURONET DIANE 

../.. 

...... 

B 4207532 

PVR SOFT 


21.30-23 

D 01650 : ROOSENDAAL 



a 463366 

EURONET 


...... 

©4221503 

COMMUNICATION 20-01. 


a 43505 WEST BRABANT 

EL/DG 

24-uur 

a 470066 

A.D.P 

../.. 

...... 


WORLD 






a 682085 

TWILIGHT 


24-uur 

© 4226843 

EAGLESOFT 


22-05. 

□ 01718 : KATWIJK 



a 682035 

VIDIWEST 


19- 24. 

©4228101 

COMPUFUN 


18-07. 

a 20445 BULLETIN 

ZAA. 

21- 22. 

a 683685 V 

VIDIWEST 


19- 24. 

B4256710 

RECOMPUT 


24 uur 




B717666 

NEABBS 


24-uur 

B 4257386 

VALSOFT 

MA/VR 

22.30-07 

0 01736 : OUDE LEEDE 



B 833644 

BELIALSOFT 


22-24. 



ZA/ZO 

00-07. 

a 6822 HCC 

../.. 

24-uur 

B 902657 

VIDIWEST 



B 4258970 

DELFSHAVEN 


20-22 




a 924442 

SAGA NET 


24-uur 

B4290685 

CHARLOIS 

ZOA/R 

22.30-04 

0 01745 : MAASLAND 



B 934699 

HOT.NEWS 


...... 

B4294059 

RBBS 


22-24. 

a 16694 MB.MAASLAND 

../.. 


B5415415 

GENERAL ELEC 


...... 

S4330014 

REDDOLTRA 

ZO/.. 

12-20. 




B 5445000 

FOKKER 


...... 



MA+DO 19-02. 

□ 01749 : POELDIJK 



a5485318 

VU ADAM TJALK 


...... 

© 4358277 

TELECOM 

MAA/R 

21-07. 

a 42897 TS SOFT 

MA/.. 

18-22. 

a 5486266 

VU ADAM VU45 



S4359145 

COMPUTRONICS 


20-07. 




B 5486267 V VU AMSTERDAM 


24-uur 

a 4384338 

C64-TEL 


20-22. 

D 01804 : RIDDERKERK 



B5611222 

SARA 


...... 

a 4515992 V TRSTEL 

../.. 

24-uur 

a 26367 RIDDERKERK 

DI + DO 

19-23. 

B 5611333 V SARA 


...... 

a4518050 

CAPELLE 

EL/DG 

20-24. 




a5611444 

SARA 


...... 

a4519435 

COPY-LINE 

ZO/.. 

12-17. 

□ 01819 : ROZENBURG 









MA/.. 

20-23. 

a 17799 RAFLOSOFT 

../.. 

21-03.00 

D 02159 

BUSSUM 



a 4522188 

ERASMUS UNIV 

../.. 

...... 

a 18168 FIDO ROZENBURGWOA. 

24 uur. 

a 32694 

HOT NEWS 


19-07. 

a4522711 

ERASMUS UNIV 


...... 








a 4527282 

MARMO.SOFT 

../.. 

20-05. 

0 01820 : GOUDA 



□ 02230 

DEN HELDER 



a4561831 

TELECOM 

MAA/R 

21-07. 

ai 7455 DATACOM 

WO/.. 

20-22. 

a 37978 

HELDER DEN 


18-23. 


ZA/ZO 

20-02. 



IA/.. 

22-00.30 





a 4587343 

CAPELLE BBC 

EIVDG 

20-24. 


ZO/.. 

19-23. 

□ 02245 

DIRKSHORN 



a 4654464 

R-DAM NOORD 

../.. 

20-24. 




a 811 

HOTLINE 

../.. 

20-24. 

a4670117 

TELECOM 

ZA/ZO 

21-07. 

□ 01830 : GORINCHEM 



a 3805 

HOTLINE 2 



a 4767732 

LURCHSOFT 


..... 

a 30406 V EXPLOCOM 

../.. 

19-01. 





a4769144 

V/D BERG 


...... 




□ 02272 

WIERINGENWERF 


a4791595 

SUNTEL 


...... 

D 01838 : 



a 2366 

WIERINGEN 

../.. 

21- 07. 

a 4800988 V TRS80 


...... 

a 2462 V TELEHOST 

../.. 

...... 





a 4827494 

H.G.K 

../.. 

23.30-? 




□ 02279 




a4831556 

INTERFACE 

ZA/ZO 

21-24. 

D 01856 : 



B 2666 

WEABBS 

EIVDG 

24- uur 

© 4858076 

BLOEMHOF 

EL/DG 

23-08. 

a2185 DATABOARD 

ZO/.. 








,,/ZA 

18-08. 




□ 02297 

NIBBIXWOUD 



a4510790 

MAILBOX 


21-06 

D 01878 : OUDDORP 



B 2888 V 

MDA 

../.. 

...... 





a 2899 OUDDORP 

ZA/ZO 

22-09. 





D 01150 

: TERNEUZEN 






□ 023 : HAARLEM 



a 12008 

TERNEUZEN 

VR/ZO 

22-24. 

D 01880 : SPIJKENISSE 



a 250700 

MEBO 

MA/WO 

20-06. 





a 15213 EUROPOORT 

../.. 

24-uur 

a 270423 

AGO SOFT ../.. 

20-08. 


n 01184 

: VLISSINGEN 



a 22248 POWER. 



a 353933 

INFO-LINE 

VR/ZO 

24-09. 

a14789 

VLISSINGEN 

../.. 

21-23. 

a26521 

../.. 

22-07.30 

a 358099 

HAARLEM 

../.. 

19-23. 

a72319 

COMPUTEL 

WO/ZO 

21-23. 

a 31056 BLIEKSOFT 

WO/.. 

20-23. 









a 31238 POWER 

VR/ZO 

18-18. 

□ 02503 

HOOFDDORP 



□ 013 : TILBURG 



a 32532 SPIJKENISSE II 

../DO 

19-24 

a15162 

MB-HOOFDDORP 

ZO/DO 

20-23. 

© 686293 

FOURTH DIM 


18-08. 

a 38548 SPIJKENISSE 

WO/.. 

19- 23. 












H 02510 

HEEMSKERK 



O 015 : DELFT 



□ 01883 : HELLEVOETSLUIS 


© 27386 

MONACO MAIL 

ZA/.. 

12-23. 

a611185 

MAILBOX 64ER 

../.. 

22-08. 

a 20240 MULTRITRONIC 

ZA+ZO 

20-02. 

a 35493 

IJMOND 

ZO+MA-19-23. 

a616718 

TANDHOF 


19/24 








©621513 

DELFT 

VRA. 

20-10. 

a 020 : AMSTERDAM 





+ DO 




ZAA, 

19-10. 

a 6891IV RABOBANK 


...... 

a 38396 

DATA1EC 

../.. 

21-08. 



ZO/DO 

20-05. 

ai00511 TWILIGHT 2 


24-uur 

B 46272 

COYOTE 


24-uur 

©788014 

TH DELFT 



B 103414 V VI Dl WEST 


19-24. 

© 47102 

J.H.P 

VR/MA 

19-08. 

© 788015 

TH DELFT 


_ 

B161697 AMSTERDAM 

ZA/ZO 

23-24. 





© 788016 

TH DELFT 



B 194334 V VOC BBS DATA 


24-09. 

Q 02968 

: BADHOEVEDORP 


a788017 

TH DELFT 


...... 

a 267080 TYMNET MCN 


...... 

a 4967 

RRBb 


22 -02. 

© 788019 

TH DELFT 


- 

S 318318 V VIDITEL 


...... 





© 788021 

TH DELFT 


- 

B 329425 AMSTERDAM 


23-07. 

Q 02975 




a 788028 

TH DELFT 


...... 

B 370987 TACOTEL 


22-07. 

a 63821 

BBS 
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02990 : PURMEREND 


26009 

WATERLAND 


24-uur 

61369 

WESTFRIESLAND 


22- 10. 

02991 

1935 

: ETERSHEIM 

BEUKELAAR 

ZN.. 

19-22. 

02998 

: MIDDENBEEMSTER 


3603 

BAMASTRA 


23-07. 

030 : UTRECHT 

103414 VIDEOTEX 



310205 V 

VIDEOTEX 


. L.. 

310344 V 

MICOBULLETIN 



331528 

FBBS 

NA/KAN 


363376 

IBM BBS 

TOOR- 

TIJD 


430720 

MB UTRECHT 

MA/DO 

18-23. 

433219 

ATLANTIS 

ZN.. 

18-03. 

24-uur 

444303 

ZUILEN 

ELVDG 

22-05. 

510105 

UTRON 

VRA. 

23-08. 

517199 V 

VIEUWDATA 4000 


.ik,. 

524511 

DEVELNET 


L .. 

896129 

DOMSTAD 

EL7DG 

18-22. 

935137 

HCC FIDO 


24 u 

03200 

28717 

' NABBS 


..L, 

033 : 

756300 

PTT DMV 


..k. 

03402 
36364 V 

: JUTPHAAS 

NOVA 



38264 V 

NOVA 



41514 V 

NOVA 


L.. 

42222 

NCHC 

ELVDG 

24-uur 

49207 

SNUFFELBANK 

MA/ZO 

19-??. 

65841 

CODISOFT 


20-23. 

03404 
68911 V 

’ RABOBANK 


...... 


03408 : IJSSELSTEIN (U) 


84484 IJSSELSTEIN 


22-01. 

03438 : DRIEBERGEN 

13221 TELEBIT ZO/.. 

MA/.. 

15303 MB DRIEBERGEN ZO/.. 

00- 24. 
00-12. 

18731 A.H. SOFT 

ZO/.. 

17-20. 

03465 : MAARSSEN 

73678 MAARSSEN 


22-02. 

03473 : VIANEN (ZH) 

72260 VIANEN 


24-uur 

76597 DOCATO 


19-02. 

035 : HILVERSUM 

17785 SOFT VIEW 

../.. 

19-22. 

40492 DATALINE 

MA/.. 

23-08. 

49204 AGIS 

ZO/.. 

12-18. 

233377 VIEWWORLD 

../.. 

18-08.00 

284822 V HOBBYTEL 

../.. 

...... 

614571 V NOS VIEW 

ELVDG 

24-uur 

778055 V NOS 

../.. 

...... 

038 : ZWOLLE 

223345 V MSX DATA 

../.. 

...... 

651982 PEPERBOX 

MA/VR 

ZA/ZO 

18-23. 

16-24. 

659076 ZWOLLE 

MA/VR 

ZA/ZO 

20-24. 

16-24. 

040 : EINDHOVEN 

112868 EINDHOVEN 

MA/DI 

23-24. 

480666 V TELEBOARD 

../.. 

...... 

741133 PHILIPS 


...... 

741154 V PHILIPS 

../.. 

24-uur 

816599 EINDHOVEN 

VR/ZA 

21-08.30 

836923 EDUCAT.BOX 

../.. 

20-21. 

04139 : 

2061 V MANADUX 


...... 

3206 V MANADUX 


...... 

04760 : 

74741 F.G.B 

MA/VR 

ZA/ZO 

20-06. 

18-06. 


D 04904 : WAALRE 


S15711 FREAK 


23-07. 

□ 050 : GRONINGEN 

S418563 VIP.MAILBOX 

MA- 

+ WO + - 
VR 

20-21.30 


ZN.. 

20 -22. 

□ 05159 : 

S 32694 BBS 


19-07. 

□ 05170 : FRANEKER 

S 5357 LM(S)OFT DATA 

DI+VR 

22-24. 

□ 05179 : WIJNALDUM 

®1001 HADES 


21-23. 

a 05190 : 

S 7356 BLITZ 

VR/ZO 

21-07. 

□ 053 : ENSCHEDE 

S 304991 FtAR 

DI/ZO 

19-22. 

S 352405 V TH TWENTE 

../.. 

24-uur 

S 357575 V ARKE REIZEN 


- 

S 615021 HUIS & HUIS 


21-24. 

S 762015 HUIS & HUIS 

../.. 

20-23. 

S 762884 R.D.V 

EIVDG 

24-uur 

S 765796 REWOSOFT 

DI+WO 

20 -22. 

S 766444 PBE MAILBOX 

../.. 

22-08. 

® 768430 SFINX 


22 -01. 

®775800 RDV 


22 -02. 

D 05410 : OLDENZAAL 

S10913 INFOTRON 


22 -02. 

□ 05454 : EIBERGEN 

® 74698 GAZANTUS 

ELVDG 

19-24. 

D 05470 : 

® 72462 MB ERGO 

MA/VR 

21-23. 


VFI/ZA 

21-24. 

□ 05490 : 

S 65437 V TELE OOST GGSV ZA/ZO 


S 68353 MICROBOX 2001 

WO/MA 

22 -01. 

a 055 : APELDOORN 

S 74622 V DATAINFOX 


...... 

S 426090 SDC 


22-07. 

S 670424 APELDOORN 


...... 

S 774662 BON AIR 


...... 

□ 05612 : BOSCHOORD 

S737V MICROTEL 600 


22-24. 

D 05700 : DEVENTER 

S 31140 DEVENTER 

ZN.. 

19-24. 

D 05750 : ZUTPHEN 

® 17745 MB ZUTPHEN 

MA/VR 

18-01. 


ZA/ZO 

14-02. 

S 26864 JUPPY 

MA/VR 

21-07. 


ZA/ZO 

12-07. 

□ 05753 : HENGELO (G) 

® 2150 DR IGGY 


22-02. 

□ 058 : LEEUWARDEN 

S 883376 MUSICBOX 

ELVDG 

21-07. 


ZO/.. 

24-uur 

D 05920 : ASSEN 

S 17142 MB ASSEN 

EIVDG 

20-08. 

□ 05964 : NIEUWWOLDA 

® 2423 OLDAMBT 


19-24. 

a 070 : ’S-GRAVENHAGE 

S151515 V VIDITEL 


...... 

S 252785 HAAGSTAD 

../.. 

18-03. 


ZA/ZO 

24-uur 

S 254298 CBBS 

WO/.. 

18-22. 

S 257225 NEWJON SOFT 

../.. 

22 -01. 

S 469307 DEF COMP CENT 

../.. 


S 557296 HOFSTAD 

VR/ZO 

18-23. 


MA/DO 

23-08. 

S 602046 TELECORNER 

VR/ZA/ 

ZO 

22 -02. 

S 614061 WINDSTON HOU 

SE 

-../.. 

...... 

S 614571 V CONT DATA NOS 


...... 


S 637379 

MICRONET 


...... 

S 650028 

HOFSTAD 

VR/ZO 

18-23. 

S679535 

MB DEN HAAG 

VR/ZA 

19-03. 

S814361 

TNO IWIS 

../.. 

...... 

S814591 

TNO IWIS 


...... 

S 897039 

INNER CIRCLE 


22-03. 

S898108 

1812 SOFT 


22-06. 

S951551 V 

HOLLAND INTER 


...... 

®961713 

CBM BBS 


17-01. 

□ 071 : LEIDEN 



S125125 

FIDO LEIDEN 


24 uur. 

□ 072 : ALKMAAR 



®121954 

EABBS 


22.30-01 

S611067 

HUISWAARD 


19-06. 



ZA/ZO 

24-uur 

S 611150 

SOFTLINE 


...... 

S 622376 

NOORD HOLLAND ELVDG 

22-01. 

Q 074 : HENGELO (O) 



S 423860 

PROGRAMMATEL 


...... 

a 075 : ZAANSTAD 



®168047 

COMTEL 


23-08. 

S314430 

DE SEAN 


23-03. 

S 352344 V 

ZAANSTAD 

../.. 

23-06. 

□ 076 : BREDA 



S 222807 

CAT-SOFT 

VR/ZA/ 

ZO 

22-04. 

D 078 : DORDRECHT 



S150831 

PAPENDRECHT 

ELVDG 

23.30-04 

®181358 

DRECHTSTAD 

../.. 

...... 

®511384 

DORDRECHT 

../.. 

22-01. 

□ 079 : ZOETERMEER 



S167164 

ZOETERMEER 

MA/.. 

19-23. 

® 219317 

IBM MAILBOX 


...... 

S 255800 

IBM ZOETERM 

../.. 

...... 

S314180 

ZOETERMEER 

ZN.. 

17-20. 



ZO/.. 

15-19. 

□ 080 : NIJMEGEN 



S41362 

MB NIJMEGEN 

ZN.. 

20-24. 

S441362 

DELTA 

VR/ZA/ 

ZO 

22-04. 

®518200 

UNIX 

../.. 

...... 

S 566540 

OUWEKERK 

EIVDG 

20-02. 

□ 08340 

: DOETINCHEM 



®40774 

DOETINCHEM 

WO/MA 

20.30-23 

□ 08355 

: DINXPERLO 



® 3181 

DINXPERLO 

MA/VR 

20-24. 



ZA/ZO 

04-12. 

Cl 08360 

: ZEVENAAR 



S27331 

ZEVENAAR 

DO + DI 

23-01. 

S 33252 

MUSICNET 


24-uur 

□ 08370 

: WAGENINGEN 



®14998 

MB-WAGENINGEN../.. 

18.30-22. 



ZO/.. 

14.45-22. 

□ 08380 

: EDE 



S37156 

FIDO-BBS HCC 


24-uur 

□ 085 : ARNHEM 



S 340640 

DCS TRON 

../.. 

18-... 

® 430608 

FIDO ARNHEM 


...... 

S456715 

BIT & BYTE 

VR/ZA 

22-01. 

S615695 

SMILE 

../.. 

11-01. 

□ 08819 

S 75556 

HORIZON 

DI/VR 

18-21. 

D 08870 

: DEEST 



® 5383 

GBBS 

../.. 

19-24. 

□ 08896 

® 1531 

DELTATRON 

ZO/.. 

12- 21. 

□ 08897 

: BEUNINGEN 



S 1837 

COURBOIS 

../.. 

ZA/ZO 

18-09. 

24-uur 
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De Commodore-gebruiker kan momenteel uit drie verschillende diskdrivetypen kiezen 
en er komen nog nieuwe types bij. In de winkels staan nu de al wat bejaarde 1541 en 
haar beide opvolgers de 1570 en 1571. Aangekondigd zijn de 1541C in de nieuwe 64C 
stijl en een wat verder afwijkende 3,5 inch drive, de 1 341. Elke drive heeft zo zijn eigen 
mogelijkheden en verdiensten hetgeen uiteraard in de prijsstelling tot uitdrukking 
komt. Om de keuze voor de C-64 en C-128 te vergemakkelijken zetten wij de 
bestaande Commodore-drieling nog eens op een rij. 

Coimnodore’s 

Diskdrives 


De 1541, 1570 en 1571 nader bekeken 


A lle Commodore diskdrives zijn 
van het intelligente type. Dat wil 
zeggen de drives hebben het 
Disk Operating Systeem (DOS) 
en de benodigde interfacehard- 
ware al aan boord. Het inpluggen van 
een Commodore serieel kabeltje en het 
netsnoer is voldoende om de drive in 
bedrijf te stellen. Bij andere huiscompu- 
ter merken zijn dikwijls drive-interfaces 
en/of het laden van het systeem-DOS 
van de schijf noodzakelijk. 

De oudste, meest bekende en waarschijn¬ 
lijk ook de beruchtste Commodore disk¬ 
drive is de 1541. Zoals menig Commodo¬ 
re-gebruiker bekend zal zijn geniet de 
1541 een reputatie van lawaaierigheid, 
slechte koeling, ontregeling van de aflees- 
kop, traagheid en een eigenzinnige wijze 
van formatteren. Niet alle kritiek heeft ech¬ 
ter op dezelfde 1541 betrekking. In de loop 
der jaren zijn al heel wat verschillende 
1541-versies door Commodore uitge¬ 
bracht. In wezen valt de nieuwe 1541C hier 
ook onder, want die is van binnen vrijwel 
identiek aan de 1541. 

Miljoenen 1541’s zijn in gebruik en we 
kunnen gerust stellen, dat het ding zich 
ondertussen meer dan bewezen heeft, al 
blijft het een wat gevoelig beestje. 


Nieuwe lijn 

Maar Commodore wilde ook verder en met 
de komst van de C-128 werd een opvolger 
dringend noodzakelijk. Een geavanceerde 
en snelle machine mag natuurlijk niet af¬ 
hankelijk zijn van een diskdrive uit de vori¬ 
ge generatie. Commodore introduceerde 
eerst de 1571, kwam toen als tussenoplos¬ 
sing met de enkelzijdige 1570 en enkele 
maanden later kwam toch weer de dubbel¬ 
zijdige 1571 drive. Deze beide drives laten 
zich ook op de C-64 aansluiten zij het dat 
de mogelijkheden door het gebrek aan een 
snelle databus op die machine beperkter 
zijn. 

De 1541 

Ondanks alle klachten heeft de 1541 de C- 
64 groot gemaakt. Deze diskdrive bracht 
geavanceerde en zakelijke toepassingen 
voor een redelijk bedrag binnen het bereik 
van de hobbyist en kleingebruiker. En nog 
steeds is de 1541 bij vele Commodore- 
gebruikers in vol bedrijf. 

De 1541 kent nog al wat Commodore 
eigenaardigheidjes. Zo gebruikt het inge¬ 
bouwde DOS een volledig eigen formatte- 
ringstype. Daarmee wordt de drive incom¬ 
patibel met door andere drivemerken op¬ 
getekende software. Dit is een van de 
redenen waarom de potentiële GP/M- 


compatibiliteit voor zakelijke software 
nooit echt van de grond gekomen is. Een 
andere bron van ergenis vormt de "slakke- 
rige” werkwijze van het lezen en schrijven. 
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Het wegschrijven van 100 datablokken 
met de C-64 en C-128 kost al gauw een 
seconde of 80. Het lezen c.a. 70 secon¬ 
den. Niet echt iets voor ongeduldige zake¬ 



lijke gebruikers. 

Aan het trage lezen en schrijven van de 
1541 valt, dankzij de inzet van slimme 
software- en hardwareontwikkelaars, wel 
een mouw te passen. Snelladerutilities en 
-cartridges weten de snelheid met een 
factor 6 tot 12 (een special Duitse met 
RAM-disk werkende Floppy Speeder zelfs 
200 maal) te vergroten. Dit gaat echter ten 
koste van de compatibiliteit met de reeds 
bestaande (commerciële) software. 

De 1541 heeft een dataopiagcapacitiet 
van slechts 170 KByte (in 664 blokken van 
256 Byte) per 5,25 inch diskette. Een ma¬ 
ger resultaat in vergelijking met de 360 KB- 
standaard die door vele andere huiscom- 
puterfabrikanten gehanteerd wordt. 
Niettemin blijft 170 KB voldoende voor de 
meeste hobby-, spel- en kleine zakelijke 
toepassingen. Voor administraties e.d. is 
een 170 KB schijfje al snel te krap. 

De lees/schrijfkop wordt door een zoge¬ 
naamde stappenmotor aangedreven. Een 
gebeuren dat met nogal wat lawaai en 
warmteproduktie gepaard ging. Het lawaai 
vindt zijn oorsprong in kopieerbescher- 
ming van diskettes en het formatteren. 
Daarbij wordt de leeskop mechanisch tot 
de aanslag gestoten hetgeen niet alleen 
een ratelend geluid voortbrengt maar op 
den duur ook de kopafstelling kan ontre¬ 
gelen. Dit laatste kenmerkt zich door het 
niet meer kunnen lezen van oude zelf 
geschreven of commerciële software. Ook 
hier speelde de (Amerikaanse) softwarein- 
dustrie handig op in door allerlei diskdok- 
ters en alignmentkits op de markt te 
brengen. 

Als laatste bezwaar geldt nog de kopieer- 
bescherming van het eigen DOS (versie 
2.X). Daarmee werd het andere leveran¬ 
ciers van diskdrives wel heel moeilijk ge¬ 
maakt om zelf met een geheel luisvrije 
drive voor de C-64 te komen. 

Tegenover de nadelen staan de lage prijs 
en 100% compatibiliteit met bestaande C- 
64-software als lichtende voordelen. In 
menige computershop gaat het nieuwste 
1541 type voor rond de ƒ3500,- over de 
toonbank. En het ligt in de lijn der verwach¬ 
tingen dat de produktie binnenkort ge¬ 
staakt en er vervolgens met de opruimprij- 
zen gestunt zal worden. De hobbyist, die 
over geduld beschikt, aan 170 KB vol¬ 
doende heeft en geen CP/M-software am¬ 
bieert zal met een 1541 best tevreden zijn. 

De 1570 

Commodore’s eerste drive van de nieuwe 
generatie is de 1570. Uiterlijk verschilt dit 
diskettestation niet zo veel van de hiervoor 
besproken 1541. Dezelfde lompe bouw en 
het grendeltje. Ook de dataopslagcapaci- 
teit van deze enkelzijdige drive is 170 KB 
gebleven. 

Uiterlijke schijn bedriegt echter want het 


gaat wel degelijk om een veel modernere 
drive. De lees/schrijfsnelheid bleef voor de 
C-64 hetzelfde. Bij de C-128 is de leessnel¬ 
heid van 100 blokken tot 7 seconden en de 
schrijfsnelheid tot 60 seconden terugge¬ 
bracht. Dat komt omdat de 1570 via de 
nieuwe snelle seriële database en aanzien¬ 
lijk hogere overdrachtssnelheid behaalt. 
Bij het openen van het drivehuis lijkt de 
mechanische opbouw vrijwel identiek met 
die van de 1541. Commodore heeft geluk¬ 
kig een aantal verbeteringen aangebracht. 
De koeling is nu optimaal en het ratelen 
verdwenen. Een optoelectronische licht¬ 
schakelaar schakelt de lees/schrijfkop 
aan/uit zonder het mechanische geweld 
van de oude 1541 -constructie. De kans op 
het ontregeld raken van de kop wordt 
daarmee beduidend minder. 

De printplaat is geheel herzien en biedt ten 



opzichte van de 1541 tal van extra moge¬ 
lijkheden. Voor de zakelijke gebruiker is 
bijvoorbeeld de verbeterde CP/M-compa- 
tibiliteit interessant. Een tweede schake¬ 
laar reageert bij het gebruik van CP/M- 
software op de indexuitsparing van de 
diskettes. 

Een deel van de snelheidswinst van de 
1570 komt voör rekening van het nieuwe 
DOS (versie 3.0)-ROM op de printplaat. Dit 
DOS maakt het gebruik van de databus 
efficiënter en biedt een aantal nieuwe, op 
de 1541 node gemiste, besturingsop- 
drachten. DOS 3.0 beschikt zowel over het 
eigen Commodore Group Code Recor- 
ding (GCR)- als het Modified Frequency 
Modulation (MFM) optekensysteem. 
Daarmee kan DOS 3.0 het gros (behalve 
speciaal op DOS 2.X ontworpen) van de 
oude C-64 software en CP/M-schijven 
draaien. In de praktijk blijken toch enkele 
pakketten en spelen uit de boot te vallen. 
Met name kopieerprogramma’s en tegen 
dupliceren beschermde software kunnen 
op de 1570 voor problemen zorgen. 

De 1570 vormt een overgangsfase tussen 
de 1541 en het topmodel, de 1571. In de 
computershop kost het 1570 diskettestati¬ 
on ongeveer ƒ 700,-. Daarmee is de 1571 
de ideale machine voor de C-128-bezitter 
die een snelle niet al te dure drive zonder 
een grote diskopslagcapaciteit zoekt. De 
compatibiliteit met CP/M 3.0 is natuurlijk 
mooi meegenomen, maar snijdt bij slechts 
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170 KB op de diskette en het nog beperkte 
softwareaanbod niet echt hout. De wijze 
van CP/M optekening is namelijk niet stan¬ 
daard, het moet er geconverteerd opgezet 
worden. 

De 1571 

Het diskdrive paradepaardje van Commo- 
dore’s homecomputers, de 1571, moest 
het C-128-concept afmaken. Een opzet 
waarin de ontwerpers grotendeels ge¬ 
slaagd zijn, hoewel er natuurlijk altijd wen¬ 
sen open blijven. De 1571 kan zoals ge¬ 
zegd niet los van de 128 gezien worden. 
Het succes van de C-128 als laatste der 
"huiscomputergiganten” hangt voor een 
groot deel af van de aanwezigheid van een 
snel en comfortabel diskettestation met 
voldoende dataopslagcapaciteit. 

Uiterlijk gezien sluit de moderne platte 
vormgeving optimaal aan bij het C-128- en 
nieuwe C-64-huis. Een handige draaiver- 
grendeling vervangt het oude druk-trek- 
hendeltje van de 1541/1570-machines. 
Van een modern gestyleerde drive ver¬ 
wacht je ook, dat zij geruisloos loopt. Een 
eis waaraan de 1571 ruimschoots voldoet. 
De motor start zodra er een disk in de drive 
gestoken of er uit gehaald wordt. De motor 
centreert en decentreert de schijf. Dit ter 
bescherming van de centrale ring. Minder 
slijtage aan de ringkern geeft ook minder 
lees en schrijffouten waardoor de 1571 het 
in bedrijfszekerheid van haar voorgangers 
wint. 

Andere uiterlijke veranderingen zijn de wis¬ 
seling van LED-functies en de dipswitch 
aan de achterzijde. De rode LED is nu 
stroom aan en de groene betekent in be¬ 
drijf (laat dan de disk in de drive zitten!). 
Even wennen voor ex-1541 -gebruikers. De 
dipswitch verandert hardwarematig het 
randapparatuurnummer van 8 tot en met 
11 . 

De 1571 kent dezelfde snelheidsspecifica- 
ties als de 1570 op de C-128. Het verschil 
zit hem in de dubbele opslagcapaciteit van 
340 KB aan data. Verstandige gebruikers 
laten daarbij de disk-knipper in de winkel 
liggen en kopen gewoon dubbelzijdige 
schijven van onberispelijke kwaliteit om 
niets van de 1328 vrije blokken te ver¬ 
liezen. Dubbelzijdig betekent ook twee 
lees/schrijfkoppen. 

Ook de 1571 beschikt over een betere 
DOS-versie dan het standaard C-64 DOS 
waardoor uitleesfouten bij C-64-program- 
matuur kunnen optreden. De gebruiksaan¬ 
wijzing laat dit probleem jammer genoeg 
enigzins in het midden. De 1571 blijft ver¬ 
der wel volledig compatibel met de C-64- 
en VIC 20-machines. Op de bijgeleverde 
Test/Demo Disk staan zelfs speciale C-64 
WEDGE-enVIC-20WEDGE-programma’s 
voor het gebruik van 1571 DOS-opdrach- 
ten. Een aantal opdrachten wordt daar¬ 


door aantrekkelijk verkort. Bijvoorbeeld 
@1 voor initialiseren en @SO Programma¬ 
naam voor scratchen. 

De Test/Demodisk biedt verder o.a.de vol¬ 
gende nuttige programma’s: 

urDOS SHELL FORMAT, CLEAN UP (a 
disk), RENAME file, COPY, DELETE, RES- 
TORE en RECORDER DIRECTORY. 
■•-SD.BACKUP voor het maken van bac- 
kups van enkelzijdige diskettes van C-64, 
Plus/4 en C-16. 

w-SD.COPY.C-64 voor het kopiëren van 
files op een enkelzijdige drive. 

«•- PRINT.##.UTIL voor een screen dump 
op de C-64 Plus/4 en C-16. 

••- DIR PRINT print directories op daarvoor 
geschikte printers. 

■•-DIR SQUEEZE haalt de gewiste filena¬ 
men uit het directory en elimineert loze 
ruimtes. 

■•-DISK-DUMP voor het bekijken van file- 
variabelen in hexadecimale en adressen in 
decimale notatie. 

■•-UNSCRATCH voor het herstellen van 
per ongeluk gewiste bestanden. 

■•- DATAMAKER voor het omzetten van 
een machinetaal-programma in datare- 
gels. 

w FORMAT DISK. 

■•- PRINTER TEST om te kijken of u printer 
wel met alle Commodore-tekens uit de 
voeten kan. 

■•-AUTOBOOT MAKER voor auto-boot 
programma’s op de C-128. 
■•-64.AUTOSTART voor het automatisch 
starten van (machinetaal-) programma’s. 
De 1571 biedt veel diskdrive voor rond de 
ƒ 1000,- en de CP/M-compatibilteit van de 
128 in combinatie met deze drive zal de 
zakelijke gebruiker aanspreken, al man¬ 
keert het nog aan de aangepaste CP/M 


software. Het voornaamste bezwaar blijft 
ons inziens de wat krappe diskette capaci¬ 
teit van 340 KB. Dat is nog steeds vrij 
weinig voor de zwaardere serieuze toe¬ 
passingen. 


Voor elke Commodore homecomputer 
zijn eigen drive. C-64 bezitters kunnen 
(nog) uit de oude 1541 en de nieuwe 
1541C/ 1570-generatie kiezen. De ge¬ 
bruikers van de modernere C-128 zijn 
meer gebaat bij de snelle data-over- 
dracht en het veelzijdiger DOS van de 
1570 en 1571. Datzelfde geldt voor de 
serieuze computeraar die ook onder 
CP/M op zijn of haar C-128 wil draaien. 
Gezien het niet al te grote prijsverschil 
gaat de zakelijke voorkeur uit naar de 
Commodore 1571. 


Abonnement 
op dit blad? 

Bel gratis 

06-0224222 

HP Teleservice: 
elke dag tot 20.30 uur 
(ook in het weekend) 
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